_S À 400 - 800 - 600 XL - 800 XL - 130 XE 


DOKET 


N°3/25F , À A 
AMI LE sn 


LE SERVEUR 
_ POKEY 










RRRESE 
4 me 


! f 
- #4 < 7 : 
4 
F A 
'e 
+ EF : # 
PTETT. 
rs 2 
35 PÉISÉ. 
: se ÉÉRPIÉ 4 
: — x É Æ 
EN Re 


| PASSER 


_ SUR ST ? 
16 PAGES DE LISTING 








psrenerr Cie + \ 2 f £. 
# / \ / 
M 2951 -3-25F elsique : 220 FB - Canada : 6 $C - Suisse/ 10 FS "4 


= 











SOMMAIRE 


LONDON ATARI SHOW 04 LISTINGS 
COURRIER DES LECTEURS 07 POURQUOI LE ST ? 
BOUTIQUE DE PRESSIMAGE 09 FLIGAT SIMULATOR I 


POKEY NOUVELLE FORMULE 12 BASIC ST contre BASIX XE 
TOUS LES PROGRAMMES 1 JEUX NOUVEAUX 
REGISTRE DES COULEURS 14 PETITES ANNONCES 
FONCTIONS ALEATOIRES {5 BIDOUILLE 
CONVENTIONS LISTINGS 16 L'ALGEBRE DE BOOLE 





Comité de mA ction : Je PEN Godefro oy GIUDICELLI. Dir de la publication / Réd Godefrc SAR ie Lars 

pad ollab nes méro : Claude SERU, Franck JEANNIN, Sté éphan e LA VOIS DE Le me ik "LEMEITOUR, “bn fran e MESLIN, Flo NIVELET, 
La ent CAR é PEYRON, Jean DESCOINS, pains ISHING PART NER e ante Laser. 

POKEY e à édné .  PRESSIMAGE, ‘SARL. e pre u capital de 2000 francs N° He < : 332127824000 17 

PRESSIMAGE 210 rue du Faubourg Saint- M rtin 75010 PARIS. Dépot légal : 2ème trimestre 

Tou ction de texte et por uments pue rs ne _ sti nte: rdite. L'envoi de textes, photos ou documents implique l'acceptation par l'auteur de leur 
libr cpu vblie ao nr s le cour un n documen tn cb 

Imprim ESNI hu ds es s Bois. Patio e : ROBIN. Transcodage et Photogravure : INCIDENCES 


POKEY SUR MINITEL 


Dans 15 jours, vous pourrez aller consulter le serveur Pokey sur Minitel. Une messagerie, l’ac- 
tualité des 8 bits, des boîtes aux lettres, des forums, vous pourrez enfin vous regrouper et com- 
muniquer. Vous pourrez aussi nous poser vos questions directement et nous vous répondrons 
sous deux jours. Vous connaîtrez avant tout le monde les logiciels et les périphériques qui sor- 
tent. 

Pour cela, un seul numéro : 3615, code SM1*POKEY. Là, vous pourrez demander de l'aide 
ou choisir n'importe laquelle des rubriques qui vous intéresse. 


3615, SM1 *POKEY : VOTRE SERVEUR ! 


Pour en faire le meilleur serveur du monde, nous recherchons quelqu'un qui soit capable de 
créer un logiciel de téléchargement à partir d'un protocole existant. Profil recherché : bidouil- 
leur fou capable de programmer en assembleur et possédant des connaissances en liaison série. 
Ecrivez à Pressimage, « Bidouilleur fou », 210, rue du Faubourg St Martin, 75010 Paris. 

A bientôt ! 
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Un 130 XE avec Pole Position, connecté à une extension Petite- 
Voiture (assez rare). 


VOUS AURIEZ 
DU VENIR ! 


-24 avril, Londres. Nous arrivons en 
vue du Novotel Hammersmith où se 
tient régulièrement un Show Atari. En 
allant boire un café avant l'ouverture 
- si mes souvenirs sont bons, c'est 
plutôt un thé, avec un nuage de lait, 
d'ailleurs - nous devisons sur l'Angle- 
terre, ses coutumes, son évolution et 
l’état du marché de la micro, lorsque 
nous tombons nez à nez avec une 
affiche de quatre mètres sur deux 
vantant les mérites d'une quelconque 
marque de cigarettes. En bas de l'af- 
fiche, un cinquième environ est con- 
sacré au texte suivant : « 60.000 
personnes meurent d'un cancer du 
poumon chaque année ». Sur la pub 
même, vous vous rendez compte ? 
Une autre, plus loin : « Fumer aug- 
mente très sensiblement les risques 
d'avortement ». 

Ils sont comme ca, les Anglais. Ils 
peuvent dire n'importe quoi sans que 
personne ne songe à s’en offusquer. 
Ils ont la publicité comparative, par 
exemple. Ils ont le droit de dire : 
« L'Atari 130 XE est mieux qu'un 
C64, qu'un Spectrum, qu'un 
BBC... » loi, c'est totalement interdit. 
Et c'est peut-être ce qui explique la 
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vivacité du XL/XE dans tout le 
Royaume-Uni. 

Car dans ce Show (où nous sommes 
arrivés pendant que je vous parlais), 
si le ST occupe une bonne part de la 
surface, les 8 bits sont bien loin 
d'être négligés. Et, tenez-vous bien, 
il y a même des nouveautés | 


LE KIT 


Première nouveauté, la plus intéres- 
sante, le 65 XE. Bon. Vous savez pro- 
bablement de quoi il retourne ; mais 
pour ceux qui auraient raté le début, 
je vais vous faire un bref rappel de 
ses principales caractéristiques. 
Premier truc frappant : il n'y a pas de 
clavier. Pour un ordinateur, c'est 
assez rare. |l s’agit en fait d'une con- 
sole de jeu. Elle comporte donc l'iné- 
vitable port cartouche, bien entendu 
compatible avec les logiciels exis- 
tants pour le reste de la gamme, ainsi 
que deux ports joystick. De plus, on 
peut brancher dessus un pistolet 
lumineux. Regardez la photo : il a un 
look tout à fait futuriste. Sur la 
machine elle-même, cinq boutons- 
poussoir très chics : start, option, 
reset, etc. Seul le help n'est pas à 
l'appel. Et c'est normal, car il se 
trouve sur le clavier. 


Le 65 XE sans son clavier, 


son joystick, son pistolet 
et son moniteur. 


Ah bon ? Alors, y a un clavier, fina- 
lement ? 

Non, comme le remarquait si fine- 
ment la comtesse de Ségur (née Ros- 
topchine) dans « Cadichon ou les 
mémoires d’un âne ». Non, il n'y a 
pas de clavier sur la console. Il y en 
a un en option, qu'on peut brancher 
sur la console pour la transformer en, 
vous allez voir que tout se tient, ordi- 
nateur. Voilà. Pour pas cher, vous 
avez un truc qui ne sert qu'à jouer, 
et si vos finances vous le permettent, 
vous rajoutez le clavier séparé et 
vous obtenez quasiment un 800 XL. 
Fortiche, non ? 

Le problème : beaucoup de jeux qui 
existent sur les XL/XE ont été trans- 
portés sur le 65 XE. Or, comme le 
port cartouche a une capacité maxi- 
mum de 16 Ko, ils ont tous été expur- 
gés au maximum. Skyfox, One on 
one et Summer games font bien grise 
mine, avec ces graphismes du style 
on-met-des-gros-carrés-colorés- 
parce-qu'on-n'a-pas-assez-de-place 
pour-faire-dans-le-détail. 

On peut bien évidemment brancher 
un lecteur de cassettes pour bénéfi 
cier des versions complètes de ces 
jeux. Heureusement. 

Et la France, demandez-vous avide- 
ment ? Là, difficile de répondre. 
Beaucoup de choses sont en train de 
changer. Il se pourrait qu'il soit sou- 
tenu, mais le contraire est possible 
aussi. Vu la vitesse à laquelle les cho 
ses évoluent, jetez un coup d'œil à la 
rubrique « Dernière minute », vous 
aurez peut-être de meilleurs rensei- 
gnements ; sinon, attendez Pokey 4. 
Même en Angleterre, personne ne 
sait quelle va être la place du 65 XE : 
entre la console VCS 2600 et la pro- 
chaine 7800 (16 bits), à mi-chemin 
entre le jeu pur et la programmation, 
va-t-il réussir à s'imposer ? Certaine- 
ment, car il bénéficie des cartouches 








Le 65 XE avec son clavier, son joystick, son pistolet et son moniteur. 


qui existent déjà, mais dans quelle 
mesure, personne ne peut le dire. 


DUR, LE DISQUE ! 


En voilà un, ça manquait ! Un disque 
dur 20 Méga-octets pour les XE/XL, 
fabriqué par Supra Drive, déjà connu 
pour ses modèles sur ST. Il est fourni 
avec un Dos, les câbles, l’alimenta- 
tion et l'interface, il se branche sur le 
bus d'extension du 800 XL ou du 
130 XE, et quelques utilitaires sont 
livrés avec. Il ne me reste qu'à vous 
donner le prix, et franchement, je 
m'en passerais bien, parce que je 
déteste faire de la peine aux gens. 
Enfin, l'information ne serait pas 
complète sans ça. Allons-y : 7500 
francs. Non, ne pleurez pas, écoutez, 
c'est pas très grave, vous pouvez 
très bien vivre sans disque dur... Là, 
c'est fini. De toutes facons, vous 
n'auriez jamais réussi à le remplir. 
Bon, parlons d'autre chose. 


UN BUREAU NAIN 


Passons un peu au logiciel. Vous en 
trouverez beaucoup chroniqués dans 
les nouveautés, mais j'ai gardé le 
meilleur pour maintenant. 

Le meilleur, il s'appelle Mini-Office Il. 
Je n'ai pas vu le |, mais le Il est 
superbe. Il existait jusqu'à présent 
sur BBC, C64 et Amstrad, le voici 
enfin sur Atari. Laissez-moi vous con- 
ter par le menu ses fonctions. 
D'abord, c'est un traitement de tex- 
tes. Un vrai, avec traitement de cir- 
culaires, justification dans tous les 
sens, recherche, remplacement, 
mouvements de blocs, affichage de 
l'heure en temps réel, comptage de 
la taille du texte en mots ET en carac- 


Arkanoid, je meurs ! 


tères.. Il y a même une option qui 
permet de chronométrer sa vitesse 
de frappe en mots/minutes. 

C'est aussi une base de données qui 
a une particularité intéressante : 
outre les formats classiques (texte, 
formule, entier, décimal), il y a une 
option qui permet de rentrer une date 
et une heure. On peut trier sur tous 
les critères, masquer des fiches, 
imprimer sur n'importe quoi, etc, etc, 
c'est une vraie base de données. 

Il y a aussi un calque, tant qu'à faire. 
Copie des formules en absolu ou rela- 
tif, impression partielle ou totale, 
sélection de la fréquence de calcul, 
sélection des mouvements du cur- 
seur, etc, etc, c’est un vrai calque. 
Ah, tiens, il y a aussi un graphe qui 
permet d'imprimer les résultats du 
calque en camemberts, lignes, bar- 
res, en deux ou trois dimensions, on 
peut avoir trois graphes superposés, 
etc, etc, c'est un vrai graphe. 
Pendant qu'on y est, il y a aussi un 
programme de communications dans 
lequel on peut utiliser, outre les pro- 
tocoles standards anglais, des proto- 
coles que l’on définit soi-même, avec 
stockage des données sur disquette 
ou cassette. 

Et puis comme il restait un peu de 
place, ils ont rajouté un programme 
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d'impression d'étiquettes, complète- 
ment paramétrable. 

Chacun de ces sous-programmes 
peut échanger des données avec le 
reste : on peut retravailler sa base de 
données avec le traitement de textes, 
puis intégrer le résultat dans le cal- 
que, imprimer les résultats sous 
forme graphique, aller chercher des 
adresses sur l'annuaire électronique 
et envoyer ça à deux cent personnes. 
De plus, ça regorge de menus dans 
tous les sens, parfaitement clairs et 
simples à utiliser. 

Derniers détails : ça tourne sur 1050 
et 48 Ko minimum sont nécessaires, 
et ça vaut 200 francs. Oui, 200 ! 
Pourquoi vous me regardez avec des 
gros yeux ? Ils ont bien le droit de 
faire des programmes profesionnels 
géniaux et de les vendre à 200 bal- 
les, non ? 
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Enfin des gadgets Atari, ca 
manquait ! Verres gravés, boites 
à disquettes en métal... 


DES JEUX 
AT THE PELLE 


Impossible de vous citer tous les jeux 
qui étaient présentés pour la première 
fois, il y en a trop. Certains sont chro- 
niqués ailleurs dans le journal, les 
autres le seront le mois prochain. 
Allez lire la critique de Green Beret, 
c'était présenté pour l’occasion. Et 
sachez que Gauntlet (oui, le vrai, 
celui des cafés, dans lequel vous 
vous baladez avec un arc en zigza- 
gant entre des chauves-souris et 
diverses autres bestioles) vient de 
sortir. Et Arkanoïd, aussi, le génial 
Break-Out amélioré. Et attention, la 
version Atari est fa-bu-leuse ! 

Lereste ? un paquet de monde se 
presse devant les stands. Et on y 
vend de tout ! Ca va du câble KBX-27 
qui permet de relier le 1050 à un 
grille-pain jusqu'aux verres gravés 
Atari (authentique |), en passant par 
les disquettes vierges, les disquettes 
pas vierges, les interfaces pour utili- 
ser un magnéto normal et les tablet- 
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TIENS ? 
ZIKMU ! 


Alors là, tenez-vous bien, les musi- 
ciens. Vous qui pensiez être obligés 
d'acheter un ST pour piloter vos 
synthés et autres boîtes à rythmes, 
laissez tomber, c'est plus la peine ! 
2-bit Systems vient de sortir un pac- 
kage tout à fait intéressant qui con- 
siste en une interface midi (avec les 
câbles, pendant qu'on y est) et qua- 
tre programmes : un séquenceur 8 
pistes (monophoniques) avec quan- 
tize, répétition de plage et paramé- 
trage des canaux Midi, un pro- 
gramme pour récupérer les morceaux 
composés avec Atari Music Compo- 
ser ou Advanced Music System et les 
jouer en Midi, et deux éditeurs de 
voix pour Casio CZ-101 et Yahama 
DX-100. Ca s'appelle Midi Master et 
ca ne coûte que 300 francs. 


CHEMIN FAISANT 


En quittant l'exposition, on croisait 
des tas de gens qui partaient avec un 
130 XE sous le bras. Oui, ça se vend 
encore, et très bien, même. C'est 
rassurant, dans un sens, même 
lorsqu'on sait qu'il sera de plus en 
plus dur de trouver des logiciels et du 
matériel en France. 

Mini Office 11: traitement de 


textes, tableur, etc. Aie ! C’est 
en anglais ! 


DE 


POKEY A BESOIN 
DE VOUS ! 


Vous le savez, Pokey change de formule à partir du prochain numéro. Une paru- 
tion certes moins importante en volume, mais beaucoup plus fréquente puis- 
que mensuelle. Pour ce surcroît de travail, nous avons besoin de vous. 

Que vous ayez fait des programmes en basic - ou en assembleur, pourquoi pas 
-, que vous soyez au fait de toutes les nouveautés hard ou soft qui continuent 
à déferler, que vous vous sentiez l'âme d’un journaliste ou plus simplement que 
vous ayez envie de partager vos connaissances, VOUS pouvez collaborer à Pokey. 
Pour celà, il vous suffit de nous écrire une petite lettre en nous indiquant ce 
que vous savez, pouvez ou voulez faire. Les fans sont les bienvenus, nous savons 
qu'il y en a parmi vous qui continuent à porter bien haut le flambeau du 8 bits : 
portons-le ensemble ! Grâce à vous, nous pourrons continuer notre action pour 


que les XL/XE ne s'éteignent pas complètement. 
Adressez toutes vos offres à : 


PRESSIMAGE 


75010 PARIS 


COLLABORATION POKEY 
210 rue du Faubourg St Martin 
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Mini Office II Label Printer 


Label Printer menu 
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then press RETURN 
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À très bientôt ! 














N ous avons reçu des montagnes de 
courrier, et sachez bien que nous 
lisons TOUTES vos lettres avec une par- 
ticulière attention. Mais vous vous ren- 
dez bien compte que nous ne pouvons 
répondre individuellement à chacun d'en- 
tre vous (notre vocation n'est pas non 
plus de pallier aux manques de vos reven- 
deurs ou d'Atari France !). Aussi, par 
pitié, n’envoyez pas d'enveloppes tim- 
brées. 

Nous publierons les réponses dans la 
mesure du possible à condition qu'elles 
ne soient pas trop spécifiques et qu'elles 
puissent intéresser un minimum de gens. 
Ou même un maximum, d'ailleurs. 
Merci pour vos nombreux encourage- 
ments, les critiques constructives sont 
aussi les bien venues. 


« Pourquoi appeler un graphique 17 
(comme l'on voit dans de nombreux pro- 
grammes) alors qu'il n'existe des modes 
graphiques que de O à 16 ? » 

M. Descamps 44400 MEZE 


Pertinente question mais la réponse se 
trouve dans votre manuel Atari : il existe 
en effet 16 modes graphiques mais 
l’ajout de 16 au numéro du mode a pour 
effet de supprimer la fenêtre de texte. 
Ainsi le mode 17 correspond au mode 1 
sans fenêtre ! 


« Je rigole quand je lis dans votre journal 
Pokey une parution régulière » 
D. Tadejan 99000 Partout 


Nous pourrions sortir Pokey de facon 
mensuelle, mais comme le laisse enten- 
dre l'Edito du N° 2, les ventes ont été 
bien inférieures à nos espérances. Ce qui 
nous à conduit à réviser notre rythme de 
parution, il ne tient qu'à vous que Pokey 
sorte plus fréquemment ! ! ! A ce propos, 
allez voir page 47, vous y trouverez de 
plus amples renseignements sur le futur 
de votre journal... 


« Ÿ aura-t-il un émulateur 800 XL sur 520 
ST?» 
Gérard SAGROUN 75016 PARIS 


Oui, il y en aura-t-il un d'autant plus rapi- 
dement qu'il existe déjà. Mais attention : 


Pour répondre en bloc à un certain 
nombre de questions, de plaintes, 
voire de menaces concernant les 
abonnements à l’Atarien, nous rap- 
pelons que toutes les demandes doi- 
vent être faites à ATARI France 9, 
rue de Sentou 92150 SURESNES, 
seul responsable de la distribution de 
l'Atarien. 


il n'émule que le basic, pas le graphisme 
ni le son. 


« Peut-on animer l'écran lors de charge- 
ments ? Si oui peut-on le faire en basic 
sur 800 XL ? » 


La routine de chargement utilisée par 
l'Atari ne donne pas la main à l'utilisateur, 
il n'est donc pas possible de faire quoi que 
ce soit pendant le chargement. Toutefois, 
il est possible de recréer une routine de 
chargement et d'y inclure de l'animation 
fou de la musique, ou n'importe quoi 
d'autre), mais la chose reste délicate, 
compliquée et infaisable en basic ! Si 
vous voulez cependant tenter votre 
chance en assembleur, un conseil : ralen- 
tissez le débit des octets en provenance 
de la cassette, ce qui vous donnera 
amplement le temps de faire des dessins 
animés, et surtout, pensez à écrire aussi 
la routine de sauvegarde des programmes 
sous le format que vous avez créé ! 


« Est-il possible d'écrire des textes et de 
les sauvegarder sur K7 sans traitement 
de texte ? » 

Marc CHATEAU 06600 ANTIBES 


Ceci peut se faire par les quelques lignes 
de basic qui suivent mais elles ne rempla- 
cent en rien un traitement de texte. Il faut 
saisir votre texte en une seule fois et finir 
la saisie par {return]. Vous n'avez en outre 
droit qu'à 5000 caractères (mais vous 
pouvez changer cette valeur en lignes 10 
{des deux programmes). 


10 dim a$ (3000) 

20 input a%$ 

50 open #1,9,0,!çu" 
4 print #1,a# 

SO close #1 

Paper ee UE À À Ed or ne 

19 dim &a%(#000) 


ECTEURS 






_ DES 





20 open #1,4,0,!ce"t 
30 input H1,4a$ 
46 print a$ 


« … quel avenir pour la gamme ? N'est-il 
pas préférable de se pencher sur le 520 
ST ou sur le 130 XE ? » 

Laurent TOURNADE 12200 


La gamme 8 Bits Atari était révolution- 
naire à sa sortie en 1979 (800 et 400) et 
les versions suivantes (600XL 800XL … 
65XE 130 XE) n'ont pas présenté d'in- 
novations technologiques majeures. 

Ainsi en 1987 il est malheureusement 
évident que la gamme vit ses derniers 
mois. Nous ne pouvons donc que vous 
encourager vivement à acheter un ST qui 
sera LA machine des années 90 ! Lisez 
à ce sujet notre dossier en page 33. 


« 25 F pour un journal de 50 pages dont 
16 de listings - qui sont à mon avis une 
façon commode de remplir un canard - 
c'est un peu cher, ne trouvez-vous pas ? 
En lisant SVM, 180 pages à 20F, j'ai l'im- 
pression d'en apprendre plus ! ! ! » 

Armand du Plessis, 92150 SURESNES 


Les listings intéressent beaucoup de 
monde, et ce n'est pas une « façon pra- 
tique d'user de l'encre » dans la mesure 
où nous nous efforcons de ne pas publier 
des programmes fleuvg mais des pro- 
grammes intéressants et courts, ce qui ne 
se trouve pas à tous les coins de rue (à 
ce propos, nos lecteurs ne sont pas très 
productifs.…..). 

Le prix ? Comparons ce qui est compa- 
rable. Vous avez le choix entre 25 francs 
pour 48 pages sur les Atari 8 bits, ou trois 
lignes pour 20 francs sur le même sujet 
{c'est en effet l'ordre de grandeur en ce 
qui concerne la place des XE/XL dans 
SVM)... 


Signalons une initiative intéressante : 
l'école St Joseph, Bruxelles (Belgique) 
pratique le Logo sur Atari et en est très 
contente. Nous ne pouvons que les 
encourager à continuer ! 

Il est dommage qu'en France on n'ait pas 
encore compris que l'on peut faire des 
choses beaucoup plus intéressantes et 
pour beaucoup moins cher avec un Atari 
plutôt qu'un Thomson (mais bien sûr, ce 
n'est pas français...) ! 


F. J 
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AKANIS ULA 


suD 
AJaCCrOo- 


= RIT nt 
UVANIT LA PREFECTURE 


Sortez de votre pliant, emballez en vitesse votre 
huile de bronzage et vos lunettes de soleil, direc- 
tion l'aéroport ! Non, inutile d'aller payer la note 
de l'hôtel, les « Services » s’en chargeront. 
Rendez-vous à Ajaccio dans trois heures, et 
n'oubliez pas votre faux passeport. Et dépêchez- 
vous, numéro 1 ! 


AReCLER 
UMBERCM 


[1] 






C'est le début d’une enquête pour le moins 
ardue qui va vous entraîner dans le maquis Corse 
à la recherche du Colonel Moustache, le N°2 des 
services secrets, mystérieusement disparu dans 
des conditions... étranges ! 


Akanis Ula, ce sont trois disquettes double face 
bourrées à bloc d'images et d'énigmes, des heu- 
res et des heures de jeu ! Enfin, un jeu d’aven- 
ture ENTIEREMENT en français ! 
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AMWS LA PREFECTURE 


Saurez-vous retrouver le Colonel Moustache 
avant qu'il ne soit trop tard ? Parviendrez-vous 
à déjouer les pièges que de sinistres individus 
placent en travers de votre route ? Qu'est-ce 
que peut bien vouloir dire « Akanis Ula » ? 
Jusqu'où vous mènera cette aventure ? Le seul 
moyen de le savoir, c’est d'y jouer ! 


AKANIS ULA, UN JEU D'AVENTURE 100% 
GRAPHIQUE, ENTIEREMENT EN FRANCAIS ! 


Je commande. . exemplaires d'Akanis Ula au prix de 189 francs l'unité, plus 15 francs de frais de port. 


NON SRE A CR Ed ad eee ne Rae re tie nas ad Pau nue CUS Gus ae 
PTÉNOME NN NT de dar can le moule 
ATOS M D ee ET AI nan eme dc da saus aus at ane int es aus 


Ville : 
Code postal : 


Règlement par : . Chèque bancaire. 


Les chèques ne seront encaissés qu'après l'envoi de la commande. 


ee Ses Se dE 


Bon de commande à remplir et à ren- 
voyer accompagné de votre règle- 
ment à : 


PRESSIMAGE 
210 rue du Faubourg St Martin 
75010 Paris 


LA BOUTIQUE DE PRESSIMAGE 


INOUI ! 
Des jeux en cassette à 25 francs 


SHUTTLE 


Simulation complète d'une mission de la navette spatiale. 


ARENA 3000 


Si vous avez aimé les jeux du type Robotron, celui-ci est pour 
vous. Et en plus, ça vatrès vite. 

Mr DIG 

Copie des célèbres jeux d'arcade DIG DUG et Mr DO. Et avec 
beaucoup d'astuces en plus. Indispensable. 


DANGER RANGER 


Une chambre au trésor où rôdent des chauves-souris radioactives. 
L'atmosphère sinistre de ce jeu comblera les amateurs 
d'aventures fantastiques. 


CUTHBERT GOES WALKABOUT 

Un remake de Pitfall, le plus célèbre jeu d'aventure animé 
d'A ctivision. 

PENGON 

Encore un jeu inspiré d'un best-seller d'arcade. Les aventures 
d'un pingouin sur une drôle de banquise. 


LAST V8 


Sur une planète dévastée par une guerre nucléaire, vous n'avez 
que quelques minutes pour regagner la sécurité d'un souterrain. 
Heureusement vous avez votre V8, à coté duquel le véhicule de 
M ad max fait bien piètre figure. Un hit en Angleterre. 


ONE MAN AND HIS DROID 

Un écran principal et six écrans annexes pour une course dans les 
profondeurs de grottes insondables. Un des meilleurs jeux de 
M astertronic. 





INCROY ABLE ! 
des compilations de best-sellers au prix d’1 jeu. 


SMASH HITS 5 

cassette 120F Disquette 
Contient ElectraGlide, Mediator, Quasimodo et Chop Suey 
SMASH HITS 6 


175F 


cassette 120F Disquette 175F 
Drelbs, Electraglide, Fort À pocalypse et Timeslip. 

Nouveau! SMASH HITS 7 

cassette 120F Disquette 175F 


Contient Alley Cat, Blue Max, Colossus Chess 3.0 et Electraglide. 


GREATEST HITS 1 
Disquette seulement 175F 
Contient Bristles, À strochase et Flip flop. 


Nouveau! ATARI ACES 


Cassette seulement 
Contient Zorro, Up'n'down, Spy Hunter et Tapper. 


Nouveau! PLATFORM PERFECTION 


Cassette seulement 
Contient Zorro, Bruce Lee, Bounty Bob et Ghostbusters. 


Nouveau! SHOOT'EM UP 


Cassette seulement 120F 
Super Zaxxon, Drop Zone, Blue M ax 2001 et Fort Apocalypse. 


120F 


120F 








EXTRA ! 
Les toutes dernières nouveautés en exclusivité 


AKANIS ULA 
3 Disquettes pour seulement 189F 


Super graphiques pour l'un des meilleurs jeux d'aventures en 
francais. Voir publicité dans ce numéro. 


BOP'N WRESTLE 
Disquette seulement (Import US) 245F 


Montez sur le ring avec dix des catcheurs les plus tricheurs et 
les plus déplaisants qui soient. Plus de 20 mouvements réeels 
du catch sont possibles pour éliminer ces affreux. Graphisme 
3D pour un ou deux joueurs. 


GAUNTLET 
Cassette 120F Disquette  175F 


Gauntlet est arrivé, point à la ligne !Sivous ne connaissez pas, 
tant pis pour vous. 


GREEN BERET 
Cassette 120F Disquette  175F 


Vous avez aimé Rambo 2 (le film). Vous avez adoré Commando 
(Le jeu de café). Vous allez devenir fou de Green Beret, le jeu qui 
décoiffe. 

SMASH HITS VOLUME 7 

Cassette 120F Disquette  175F 


Si je vous dis que pour le prix d'un seul jeu, on vous livre les 
hits: BLUE MAX, COLOSSUS CHESS 3.0, ELECTRA GLIDE et 
le désopilant ALLEY CAT, vous allez penser qu'on est tombé 
sur latête. Je confirme: on est tombé sur latête. 


SPINDIZZY 
Cassette 120F Disquette  175F 


Copie de M arble Madness, Spindizzy est en train de faire un 
tabac Outre-M anche. Et avec juste raison. Les graphiques 3D 
sont parmi les plus beaux jamais vus sur XL/XE et la qualité du 
jeu excellente. Qui a dit qu'on ne trouvait plus rien sur ATARI ? 


THE PAWN 
Disquette seulement 245F 


Ceusses qui l'ont vu sur le ST en sont tombés sur le dvm (à une 
lettre près). Ceux qui vont le voir sur les XL/XE vont en rester 
cbcb (même code). Il est pas loin d'être aussi beau. Pour ceux 
qui ne suivent l'actualité que de très loin, précisons qu'il s'agit là 
d'un des meilleurs jeux d'aventure toutes machines confondues, 
mais que les d'aucuns qui voudraient rentrer dedans sans une 
connaissance LA ge du Shakespeare's language font 
preuve d'un incorrigibl timisme. 





SUPER ! 
des hits récents à des prix jamais vus | 


CHESSMASTER 2000 
Disquette seulement 


Le jeu d'échecs de référence sur toutes les machines. Super 3D 


CHIMERE 


195F 


Disquette seulement 95F 
Le hit du jeu d'aventure en francais de fin 86. 

HARD HAT MACK 

Disquette seulement 95F 
ONE ON ONE 

Disquette seulement 95F 
RACING DESTRUCTION SET 

Disquette seulement 95F 


Incroyable rapport qualité-prix pour ce best-seller sur 64. 


REALM OF IMPOSSIBILITY 
95F 


Disquette seulement 
Incroyable dédale de salles en 3D. 


LA BOUTIQUE: Domaine Public 


DPJ01 6 JEUX D'ARCADE DIVERS 


Contient Epsilon, un jeu d'escalade. Goldrush, ou il faut 
creuser pour trouver de l'or. Phantom est une sorte de 
Defender et S aucer une sorte de Space Invaders. Spasault 
et Steller sont deux autres jeux d'espace. 


DPJ02 3 FLIPPERS 


Deux d'entre eux sont en langage machine et l'autre est en 
Basic. Pour les amoureux de la petite balle. 


DPJ03 4 JEUX D'ARCADE DIVERS 


Jeopard}y est un jeu d'escalade, Spookbusters un jeu à 
trois niveaux ou il faut tuer ou être tué, Jumpking est un 
jeu de cross sur moto et Creepshow un excellent flipper. 


DPJ04 10 JEUX D'ARCADE DIVERS 


Parus dans Analog et Antic, ces dix jeux sont tous en 
langage machine. À ndrotron, Arachnid, Earth, Firebird, 
Livewire, Planet, Race in Space, Retrofire, Round Up et 
Shooting vous apporteront des heures de jeu et des lecons 
de programmation. 


DPJ05 8 JEUX D'ARCADE DIVERS 


Antipong, un pong pour deux joueurs. Lost, un labyrinthe 
3D d'ou il faut s'échapper, Roni's TV un jeu d'escalade et 
de trampoline; Robot R aid, un voyage dans les cavernes. 
Dans Space Limbo il faut descendre des Aliens. Dans 
T'axm an il faut ramasser l'argent avant le contrôleur et 
dans Thief il faut manoeuvrer un vaisseau dans des 
cavernes. Quant à Zurk, c'est un Robotron. 


DPJ06 4 JEUX LONGS 


Backtrack est un excellent jeu ou il faut creuser pour 
ramasser des trésors. Gauntlet (le faux) est une sorte de 
Defender. Smush est un jeu d'escalade et Tricky un jeu 
complexe d'adresse, de logique et de stratégie. En prime 
une démo 3D avec de lamusique. 


DPJ07 5 JEUX DIVERS 


Skiing est une simulation de ski, accompagnée de Skiedit 
qui permet de fabriquer des parcours. Blackbird vous 
plonge, vous et votre vaisseau dans les profondeurs de la 
terre. Digger aussi, mais plutôt avec une pelle qu'un 
vaisseau. Popcorn est pour les plus jeunes et FA G permet 
de jouer jusqu'à 4 joueurs ensemble. 


DPJ08 5 JEUX D'ESPACE 


Defense, Gravity, Lander 11, Orbital et Stargunner ont de 
quoi satisfaire les mordus de jeux d'adresse dans l'espace. 


NOUVEAU! DPJ09 5 JEUX DIVERS 


Dans Bay Pilot vous manoeuvrez un navire en évitant les 
pirates. Vous devez réussir chaque tableau avant de passer 
au suivant. Slammer vous emmène dans les poubelles et 
le monde étrange qui y vit. Hats vous permet de récuperer 
des chapeaux comme son nom l'indique au demeurant. 
Gridmaster a connu son heure de gloire sur tous les 
micros, Quant à Quiz c'est un jeu culturel pour les 
anglophones de tout poil. 


NOUVEAU! DPJ10 7 JEUX DIVERS 


Escape est un labyrinthe 3D avec déplacement très rapide 
où vous choisissez la taille de votre labyrinthe. Dans 
Sabotage vous devez échapper à un rayon destructeur et 
gagner de nouvelles salles. Eire est un jeu d'escalade 
où se mêle action et stratégie, Monkeys est un jeu de 
cirque et de ballons bien connu, mais très difficile, 
Lunarpat est un jeu de déplacement dans des grottes. Et 
Pig est un jeu de dés à deux joueurs. 


DPJ11 5 JEUX 


4 jeux.d'aventure et un jeu d'arcade. Attention, pour les 
amateurs de jeux d'aventure, ils sont en anglais, 


DPJ12 7 JEUX 


Bowlers, Flipit, Gambler, Happymaze, Snowflak, Sunrise 
et Wordsearch.Ce sont des jeux de réflexion, d'adresse et 
de hasard. 


NOUVEAU! DPJ13 5 SIMULATIONS 


Pour ceux qui aiment utiliser leur intelligence et leur 
concentration. Titan est une simulation économique sur 
une planète éloignée. Dairy vous permet de manager une 
entreprise laitière. Safariland est une simulation classique 
de gestion d'un Etat. Convoy vous permet de faire 
manoeuvrer un convoi pendant la seconde guerre 
mondiale. Quant à Fish, ce jeu vous permet de mettre vos 
capacités de pêcheur à contribution. 


NOUVEAU! DPJ14 5 JEUX DIVERS 


Jeux d'aventures graphiques et simulations pour cette 
excellente compilation. Dragonlord est un Jeu de rôle 
classique où les qualités de votre héros lui permettent de 
gagner or et pouvoir dans l'exploration de multiples salles. 

ooky's Quest a des graphiques superbes , il s'y mêlent 
trésors et monstres divers. Pharaoh est une aventure 
classique. Nuclear simule le fonctionnement d'un réacteur 
nucléaire Pourrez-vous empêcher Tchernobyl? Quant à 
Oilswell, il vous permet d'exploiter au mieux de vos 
intérets de richissimes gisements de pétrole. 


DPJ15 DISQUETTE de l'AVENTURIER 


NOUVEAU Cette disquette contient les solutions des 
jeux d'aventures suivants: Deadline, Witness, Mystery Fun 
House, Pyramid of Doom, Ghost Town, Pirate Adventure, 
Mission A steroid, Infidel, Hitchiker's Guide, Mask of the 
sun et Cutthroas. Vous aviez sûrement rangé la plupart de 
ces jeux dans un placard. Redécouvrez les avec cette 
disquette indispensable. Elle est tout en anglais bien 
évidemment. 


NOUVEAU! DPJ16 7 JEUX DIVERS 


Kismet II est un jeu type Y ahtzee. Solitaire est un autre 
jeu de cartes. Lost vous emmène dans un labyrinthe 3-D, 
Tee off est une chasse au trésor à 4 joueurs. Hangquote, 
Flags et Decode sont des jeux pédagogiques et de 
reflexion. En anglais ! 


DPUOT XL/XE KIT 

Cette disquette contient le DOS 2.5 plus XL FIXER qui 
permet de passer de nombreux jeux écrits pour 400/800 
sur la série XL/XE. Elle contient en outre un programme 

qui permet de créer un disque virtuel (Ram Disk) même 
sur un 800 XL. Plus un copieur en une passe sur le I30XE 
et un copieur multifichiers. Enfin est inclus un programme 
qui contrôle la vitesse du lecteur de disquesttes. 


DPUO2 UTILITAIRES 1 


M achDos est un nouveau Dos. Diskdump permet de 
désassembler un programme sur disque. Fastsort contient 
trois routines de tri à inclure dans vos programmes. 
Formatix vous permet de formater vos disques 
normalement ou avec des secteurs spéciaux. Widetext peut 
mélanger plusieurs styles de texte en Graphics 0. 
Pmdesgnr et Pmaid vous aident à générer des players 
missiles. 


NOUVEAU! DPU03 PAINT 


Enfin dans le domaine public, un des plus puissants 
logiciels de dessin et de peinture disponibles sur l'Atari. 
Ce programme a valu plus de 500 francs et reste l'un des 
meilleurs pour exploiter la puissance graphique de la ligne 
Atari 8 bits. En prime, dans la documentation fournie sur 
le disque, toutes les instructions pour inclure les images 
nalisdés dans vos propres programmes. 


NOUVEAU! DPU04 UTILITAIRES 2 


Diskfix est en code machine et vous permet de changer les 
directories, suivre les fichiers sur les secteurs du disque... 
A ddmenu vous permet de fabriquer un menu pour appeler 
vos fichiers. Fildsort, Unlock, Superdir, Scrdump, Tinytext 
21 complètent cette collection d'utilitaires. 

DPG01 TRAITEMENT DE TEXTES 

Tiny Text est un excellent traitement de texte avec 
formatage 80 colonnes. Livré avec de nombreux utilitaires 
d'imprimantes et autres. 


LES JOURNAUX 


Pokey 1 25F 
Pokey 2 25F 


Pour vous renseigner pe 
sur les possibilités des ST: 
ST Magazine 3 25F 
ST Magazine 4 25F 


Pour éviter de taper les ST Magazine 5 25F 


listings de Pokey: 

Disquette Pokey 1 60F 
Disquette Pokey 2 60F 
Disquette Pokey 3 60F 


ST Magazine 6 
ST Magazine 7 
ST Magazine 8 
ST Magazine 9 





PRODUITS HORS DOMAINE PUBLIC 


Création musicale 60F Recopie Ecran 1029 75F 
Carnet d’adresses  125F Sherlock 1050 295F 
Dos Iconique 160F Kermit 100F 


Notez bien: les disquettes "Domaine Public’ sont à 60 francs. Pour 4 achetées, nous vous offrons la cinquième. 












DU 16 au20 JUND8T 


_ Pourtous ls fanatiques de la série ATARI 
400 / 800 / 600XL/ 800XL / 1200XL / 65XE / 130XE 
| Des urétés certroies (400,800,800X7, BOXE) à des pr ous fous fous ! 

à Des périphériques (lecteurs de casseties, de disquettes, imprimantes) 
Des centuines de bgiciel de 
© Retenez bien ka dote, Du 15 au 20 Juin, MICRO VIDEO brak TOUS ks articles de son stock ATARIS bits. 

| Matériel à partir de 150 francs 
Logiciel à partir de 15 frar 














MICRO VIDEO orne, 


Métro: Gare du Nord 





BON DE COMMANDE 
































15 francs 











- PORT 
— + NET A PAYER 


euillez trouvez ci-joimt mon r .C.P. “ ; DATE: / | 87 
Veuillez envoyer mon (mes) articles à: 
; PRENOM 





N 
ADRESSE 


SIGNATURE 


CODE POSTAL VILLE 
À envoyer à: LIBRAIRIE PRESSIMAGE 210, rue du Faubourg Saint- Martin 75010 PARIS 








Attention ! Toute commande DOIT IMPERATIVEM ENT être accompagnée de lamention 
suivante: "J'ai connaissance du fait que certains produits que je commande ont une notice 
et / ou un écran en anglais et je désire les acquérir tout de même.", datée et signée. 





















ATTENTION ! 


NE TARDE 
z 
À VOUS ABONNER 


POKEY 3 
MAS DERNIER 
de a 

E OÙ LIBRAIRIE 







Numéro 4 guillet / Août 1987 






UN NOUVEL ATARI 
EN SEPTEMBRE _ 


De rumeurs en rumeurs et au-fil 
des présentations lors de salons 
si écialisés, il apparait de plus en 
able qu'Atart va jancer 
s une 
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CONNECT WARGAME se 
UNE IMPRIMANTE CONSTRUCTION ar 
SET st livré avec Car c'est | 


SUR VOTRE ATARt qu° ., Car c'es 
SN re GS es nouveautés du système qui ne 
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De nombreux problèmes selient Les nouveautés de qualité Sur ja choix de SEG 
àla connection de ériphériques igne Atari sont MOINS rares qu'une Par ailleur 
sur Les Atart L/XE. Un des plus distribution anémique En 
agacant est celui de 1a liaison à pourrait le faire croire. C "est ainsi È 
une imprimante. qu'un jeu, on mé lecteur de disquettes pour 
D'agacant, € problème est deve- d'un concept de jeu nouveau, vient 8 sa con sol 
s'ajouter a la bibliothè ue Drdinateur. Les Pr annonc 
#90 francs pour la console et de 
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e se connecter à 
l'unité centrale. Double corollaire Ê 
of tement pas terrains de combat ou 
sd ités échappant ainsi à un 
ni se servir d'u imprimante (lire suite page 1) 
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ji v'un Atari 8bits., , 
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10 numéros par an 
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‘ a ni 
j'ALari d'une interface spéciale £ 
Qui ui pere de faire +. 
comprendr à l'imprimante les AE 
. _ #4 
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signaux wi lui envoit. Bien que 


q 
difficile à trouver: de telles  — 
(lire la suite page 4) £ 
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ADRESSE PRENOM 





EE EE 


D DEN | 


DES LISTINGS 





Q ui n'a jamais buté sur une erreur 
rebelle dans un listing ? À en croire 
le courrier que vous nous envoyez, peu 
de gens. 

Nous avons bien publié dans Pokey n°1 
un vérificateur de listing mais nous 
n'avons pas été très bavards sur son 
fonctionnement, ce qui rendait son utili- 
sation peu aisée. 

Il n'est jamais trop tard pour bien faire, 
non seulement nous republions dans ce 
numéro les deux vérificateurs de listing 
(disquette et cassette) mais en plus nous 
allons vous expliquer en détail leur utili- 
sation. 


EN DISQUETTE : 


Une fois votre programme tapé, sauvez- 
le normalement avec SAVE « D : nomprg. 
BAS ». De plus, après avoir fait cela, 
sauvez-le sous forme ASCII (c'est sous 
cette forme que le vérificateur de listings 
utilise vos programmes) avec l'instruction 
LIST « D : nomprg. LST ». Maintenant, 
chargez le vérificateur de listings avec 
LOAD « D : DETECT. BAS ». Placez la 


disquette où se trouve votre programme 
à vérifier et là seulement, tapez RUN. 


L'ordinateur vous demande le nom du 
programme ; tapez D : nomprg. LST {le 
D : est IMPORTANT). L'ordinateur vous 
demande alors le dernier numéro de ligne, 
regardez sur le listing et tapez-le (ex : 


1500 IRETURNI). Le programme travaille 
quelques secondes et affiche READY. Là, 
tapez ENTER « D : nomprg. BUG » puis 
LISTez-le (vous pouvez l'imprimer, avec 
LIST « P:», si vous avez une impri- 
mante). Maintenant, comparez le listing 
obtenu avec la liste de DATAs publiée en 
commençant par le dernier chiffre de cha- 
que ligne. Si ce chiffre est différent, regar- 
dez le détail de la ligne de data pour loca- 
liser le chiffre précis qui n'est pas bon. Si 
vous avez par exemple 260 DATA 2118, 
2582, 999, 1300, etc. et que 999 n'est 
pas bon, comptez les lignes de votre pro- 
gramme en partant de la ligne 260 et en 
changeant de ligne à chaque virgule dans 
les datas. Vous tomberez par exemple ici 
sur la ligne 280, c'est que votre erreur se 
situe dans cette ligne. Retapez donc cette 


SANS FAUTE 


ligne, votre programme devrait fonction- 
ner. Si ce n’est pas le cas, recommencez 
la procédure depuis le début : SAVE « D : 
nomprg. BAS », LIST « D: nomprg. 
LST » etc, etc. 


EN CASSETTE : 


La procédure est la même si ce n'est que 
vous devez sauver votre programme avec 
LIST « C : » et que les DATAs produits 
ne sont pas stockés dans un fichier mais 
affichés à l'écran. 


Sachez pour finir que nos programmes 
sont imprimés et photocomposés DIREC- 
TEMENT sans intermédiaires ce qui rend 
impossible toute erreur de frappe de notre 
part. Vous n'avez maintenant plus 
aucune raison de ne pas faire fonction- 
ner les programmes du cahier des listings. 
Si la recopie vous rebute, vous pouvez 
toujours vous procurer la disquette du 
numéro. 


Franck JEANNIN 


20 RE M E-E-ÉIE-DMEDE-DMEDEDMEDDntDËéDDDDEDEMEE-2DÉEé 639 ? LCTI,ACTD 
29 REM #K#% DETECYEUR D' ERREUR ### 


TO REM #62 PAR À. SAUINE 


Dept 


649 7 HA4;ACTD>;"'",""; 


645 IF LCTI=-DER THEN POP :G0TO 650 


49 REM mx CCD L' ATARIEN FREE 
SO HREM  é-é-é-Dé-DE-DE DE DM Dé DMé-DMéJM ED DOEEDÉE 


60 TRAP 106 


646 NEXKT T 


656 FG-6:FOR 


Le 


790 KHIO 33,H1,0,06,'"°D:B1UG'°: CLOSE H4 
109 GRAPHMICS O:POKE 716,115:POKE 712,1 


AS: POKE 769,15:CLOSE F4 
110 DIM FILES (106) ,PRTS$SC192 ,A 
6) ,L<26)2 


666 7 FG; 


676 ? H4;FG; 


V=1 TO T:FGSFGtACY) : MEXT 


6856 TRAP 6606:7 CHR$SC1559;:7 H4; CHRS$S C15 


cC:062 ,hn€C2 52 ; 


706 NEH 


129 ? ‘® NOM DU FICHIER À VERIFIER ‘‘;3;:JI 


MPUY FILLES 
1271 » 37 SR Pr 


INPUY DER 

10 OPEN H1,4,0,FILÉES:7 :7 
ENCFILE 5) 
 OYFELES 


12 ="", HG": CLOSE HA: OPEN 154,5 


190 REM EEE EEE DEEE EEE 
1229 7 "DERNIERE LIGNE DL FROGRAMME tt 296 REM #%## UVUERIFICATELUR K7 Æ## 
36 REM 2 EEEEEMEÉEÉEDEDE 


tFAILES$ CI 49 GRAPHICS 


O:POKE 752,1:POKE 709,15:P 
OKE 7196,90:DIM IS C260)2 , AS C262 


56 ? :?27 :7?7 ‘‘REBOBINEZ LA CASSETTE Jus 


‘‘PROGRAMME À VERIFIER, 


":GET HLi,A:CLOSE #1 





159 IF PRIS="'O" THEN OPEN H2,8.0,"P3°" U' À VOTRE ‘':72 
209 GRAPHICS O:POKE 71B,11S:POKE 712,31 PRESSEZ GOT)" 
15:POKE 799,15 69 OPEN H1,4,6,''K: 
295 REM 796 OPEN #1,4,0,''C:° 
2186 FOR U=1 TO 19 


229 INPUT H1,A4$5:7-9 


250 T=TFLILIF ASCT,T2=°° ‘° THEN 


2486 GOTO 236 

258 T=T-1 

259 L CUD VAL CAS C1, T2 

2796 T=Tr2:ACU)>=6 

256 FOR Y=T FO LENCAS)D 

296 À CU =Aû CD +ASC CAS CT, VA 
306 NEXT Y 

46 NEXT U:iLK=O:?7 H4;LC13;"" 
416 FOR T=1 TO 16 

426 7 LCTI, ACT) 

421 7? HA4;:ACTI:;°°,""; 

449 NEXT T:FG-6 


459 FG-0:FOR T=1 TO 16:FG=FG#+ACTD:NEXT 


T 
469 7 FG; 
AGL ? H4;:F6G; 


489 TRAP 606:? CHRSC155)2 ;:7 4; CHR$S CLS: 


S2 ; 

A1 GOTO 295 

696 TRAP 656 

616 LK=-6:?7 H4;:LC12;'" DATA ‘'; 
629 FOR T=1 T0 196 


DATA "35 


89 Z=B:LIGNE=Z:PLIN=Z:H=2 


26 TRAP 566 


250 166 INPUT H1,1S 
116 LIGNE=LIGNE+1 
126 AS$SC13-'" ‘': AS CZ202="" ‘AS C23=AS$ 
121 AP=9 
122 AP=AP+L:IF IS CAP, APD2='" ‘" THEN 156 


123 AS CAP ,API=1I5 CAP, API: GOTO 122 


13539 AP=AP+1:LINUM=EUAL CASD : NLCK=NLCK+ AL: 


IF NLCKD>1 AND NMLCKÇ<LL THEN 296 
146 IF LIGME=1 THEN 286 


156 7 ; TOTAL:NLCK=1 
288 TOTAL=O:7 LINUM;'' DATA:'; 


299 CHKSUM=S 
366 FOR I=AP TO LENCIS) 
53602 CHKSUM=CHKSUM#H+ASC CIS CI, L2> 2 


319 NEXT I 


529 7 ; CHKSUM;'','"; : TOTAL=TOTAL+CHKSLM: 


GOTOo 56 
566 CLOSE #1 


S16 7 ; TOTAL 


526 END 





TILISATION OPTIMUN 
DES REGISTRES DE 
COULEUR 


‘utilisation « classique » des registres 

de couleur se fait de la facon sui- 
vante : on attribue une couleur à un regis- 
tre de couleur par l'instruction SETCO- 
LOR, on sélectionne le registre par l'ins- 
truction COLOR et on affiche ce que l’on 
doit afficher par des PRINT +6, des 
PLOTSs ou des DRAWTOs. 
Mais l'on peut réaliser des effets très inté- 
ressants en modifiant le contenu du regis- 
tre de couleur après l'affichage. C'est 
l'objet de cet article. 


AFFICHAGE SoOI- 
GNE PAR DEGRADE 
PROGRESSIF (Cf : 
programme  d'illus- 
tration présent dans 
le cahier des listings) 


L'affichage blanc sur fond noir peut paraî- 
tre parfois agressif. Voici un bon moyen 
pour le rendre agréable : Affichez votre 
texte en noir (sur fond noir, ça ne se voit 
pas) puis augmentez progressivement la 
luminosité jusqu’à obtenir du blanc. Lais- 
sez affiché quelques instants puis reve- 
nez progressivement au noir. 

Affichez un autre texte et renouvelez 
l'opération ad libitum. 


UTILISATION D'UN 
REGISTRE DE COU- 
LEUR COMME 
ENCRE INVISIBLE 
(CF : programme 
d'illustration présent 
dans le cahier des 
listings) 

dns pis eut ds 


beaucoup plus probant avec un dessin 
provenant de la tablette tactile mais c'est 


14 


incompatible avec la présentation sous 
forme de listing. Je vous demande donc 
de m'excuser si dans un souci de péda- 
gogie mes programmes d'illustration ne 
sont pas toujours aussi spectaculaires 
que je l'aurais souhaité. 

L'affichage point par point d'un dessin, 
logo ou texte produit souvent un effet 
esthétique intéressant. Mais à part pour 
les formes simples, cela reste compliqué 
excepté en manipulant les registres de 
couleur. Voici cependant une solution. 

Affichez votre dessin, logo ou texte par 
le procédé que vous souhaitez (PLOTSs et 
DRAWTOSs ou tablette tactile). Ensuite 
mettez dans ce registre de couleur la 
même couleur que celle du fond. Puis 
vous allez lire par l'instruction LOCATE 
le contenu d'un pixel et si ce dernier est 
différent de la couleur de fond alors vous 
affichez à cet endroit un point de la cou- 
leur finale souhaitée. 

Tout ça est très théorique, reportez-vous 
au programme d'exemple pour une com- 
préhension plus aisée. 


CREATION D'UNE 
ANIMATION 


Ce point est sans conteste le plus impor- 
tant de l’article puisqu'il permet la réali- 
sation d'une animation très rapide qui 
n'est pas limitée par la taille du motif 
{seule restriction : le nombre de positions 
possibles) 

Vous trouverez dans le cahier des listings 
deux programmes qui utilisent ce procédé 
pour faire voler des petits oiseaux... 

La partie délicate réside dans la prépara- 
tion de l'écran, l'animation en elle-même 
est un jeu d'enfant ! 

Toutes les positions doivent être présen- 
tes à l'écran simultanément mais dans 
des couleurs différentes. 

Voyons tout de suite un exemple avec un 
petit robot qui agite ses bras. 

Pour simplifier les 1 symbolisent des 
points de la couleur 1, les 2 des points 
de la couleur 2 etc. 


11111111 555 
2 111111111111 5 66 
222 1111 111 111 Séé66 
3322222211111111111156 66 
3333351111111111116 77 
33444444111111111111777777 
44 111111111111 77 
4 4 ‘111111111111 
1 1 
111 111 





Attribuez les couleurs suivantes aux 
registres de couleur : 

registre 1 : jaune (par exemple) 
registre 2 : noir 

registre 3 : noir 

registre 4 : noir 

registre 5 : noir 

registre 6 : noir 

registre 7 : noir 

registre O (fond) : noir 


En attribuant la couleur jaune à un des 
registres 2, 3, 4 et à un des registres 5, 
6, 7, en remettant en noir les précédents 
registres mis en jaune et en réattribuant 
la couleur jaune à deux autres registres 
et cela un certain nombre de fois, vous 
créez l'illusion d'une agitation. 

Le mode graphique 10 avec ses 9 cour- 
leurs vraiment différentes s'avère être le 
plus adapté pour réaliser des animations. 
De plus je vous conseille vivement d'uti- 
liser des POKESs plutôt que des SETCO- 
LORS. Voici donc un tableau de corres- 
pondance entre les registres de couleur 
et les adresses pour les POKESs dans ce 
mode graphique. 


N° DE LA COULEUR 


1 
2 
3 
4 
5 
6 
7 
8 


Je vous rappelle que vos POKESs doivent 
être sous la forme POKE ADRESSE, 
VALEUR avec VALEUR =COULEUR*16 
+ LUMINOSITE. 


Maintenant, à vous d'animer ! 
Franck JEANNIN 


Dans le prochain numéro : 

Un AUTORUN MAKER en listing (réalisez 
vos AUTORUN. SYS vous-mêmes. Beau- 
coup plus puissant que la routine du DOS : 
2. 5). 

PEEKSs et POKESs : Les adresses inexplo- 
rées. 

Développer en Basic : Des conseils pour 
tout ceux qui aimeraient commercialiser 
des programmes mais à qui le passage au 
langage machine fait peur. 


















ms 


DB CALC DEMAN DATAMAT VI 


pQW SHOW : LES NOUV BELLE-ILE-EN-MER EN BASIC 









er parts VOTRE DA D I TOUS LES JEUX DU ST | EVOLUTION LA REVOLUTION ? 
PE D mire mn COMDEX : L'EDITION ELECTRONI 
3 GESTIONNAIRES DE N'OATAMAT VE à TABLEURS / FLIGHT SIMULATOF 

LES ACCESSOIRES DE BUREAU 


LA DIGITALISATION MIDEO 
UN EMULATEUR COMPLET DE L'IBM PC 
? SUPER PROGRAMMES EN BASIC 


ESS 


» ST. ET. S 


MEN PARADE us 
f EMULATEURS 


ATAR — 
MAL 





APPLE 1 







—— AMIGA 
ESS gs (EM 
DÉGAS ELITE ART DIRECTOR 
C.ES, : LES NOUVELLES MACHINES 


EE 












LE BANC DES « 
6 TRAITEMENTS DE TXTE 


XP: UN CLOME DE LOTUS À 
MEL LE SU AU MAT 






























POUR TOUT SAVOIR 
SUR LE ST 


Déjà 9 numéros plein 

d'informations, de bancs d'essai 
et d'astuces pour mieux 

connaitre la machine. 


ABONNEMENT: 
200 francs pour 10 numéros. 
ANCIENS NUMEROS: 
25 francs le numéro 


Bon de commande en page 11 


COMPRENDRE LE HASARD ET 
LES FONCTIONS ALEATOIRES 
SUR ORDINATEUR 


V ous connaissez tous la fonction RND 
(abréviation de random qui veut dire 
aléatoire en anglais). Celle-ci génère des 
nombres aléatoires supérieurs à O et stric- 
tement inférieurs à 1. Pour obtenir un 
nombre entre 1 et 6 {le tirage d’un dé par 
exemple) vous devez la formuler ainsi : 
10 À =INT(RND(0)*6) + 1, car RND(0)*6 
vous fournit un nombre entre O et 5, 
9999999999..., INT se charge de ne gar- 
der que la partie entière et bien entendu, 
+1 nous donne un chiffre entre 1 et 6 
(inclus). 


Notez que la fonction RND de l'Atari est 
performante et que certains ordinateurs 
pourraient lui envier. 


Je me suis amusé à faire quelques sta- 
tistiques, et voici les résultats pour 
20000 tirages de chiffres entre O et 9 : 


: 10. 02% 
: 9. 87% 
: 9. 91% 
: 10. 18% 
: 9. 95% 
: 10. 27% 
: 10. 36% 
: 9. 78% 
: 9. 95% 
: 9. 74% 


© © -J O O1 PB W N = © 


Le faible écart entre les différents résul- 
tats montre bien que le tirage est homo- 
gène, ce qui est primordial pour une fonc- 
tion qui doit en théorie « sortir » autant 
de 0 que de 2 ou que de n'importe quoi 
d'autre. 


Après une brève présentation de la fonc- 
tion RND, entrons dans le vif du sujet, 
c'est-à-dire son fonctionnement. 


Ne vous êtes-vous jamais demandé ce 
que vous feriez si RND n'existait pas ou 
même comment l'ordinateur peut-il bien 
générer des nombres aléatoires ? 

il y a bien sûr l'adresse 53770 dont le 
contenu varie tous les 60Ëemes de 
seconde. RND(0) pourrait être remplacé 
par PEEK(53770)/256 mais cela ne 
répond pas à la deuxième question dans 
la mesure ou il faut bien que l'ordinateur 
gère l'adresse 53770 ! 

Ce qui peut vous gêner dans la compré- 
hension de la facon dont l'ordinateur 
« fabrique » des nombres aléatoires c'est 
qu’en réalisant toujours les mêmes ins- 
tructions au même moment, on obtient 
toujours le même résultat ! ! ! Par exem- 
ple, si vous allumez douze mille fois votre 
Atari, et que vous tapez douze mille fois 
PRINT RND(O), vous obtiendrez douze 
mille fois le même chiffre. Vous vous 
demandez alors comment faire entrer le 
facteur « hasard » | 

C'est simple. Nous n'avons besoin en fait 
que d'un point de départ qui est variable. 
Or, l'ordinateur est équipé d'une horloge 
interne qui modifie les adresses 18, 19 
et 20. 

Il va donc nous falloir choisir des instruc- 
tions judicieuses pour aboutir à un nom- 
bre compris entre O et 1. 

Je vous propose de faire au plus simple. 
Vous savez qu'un sinus est toujours com- 
pris entre -1 et 1. En prenant la valeur 
absolue, vous obtenez un nombre positif 
inférieur ou égal à 1 (le fait de pouvoir être 
égal à 1 diffère un peu de la véritable 
fonction RND). 

Nous avons donc la chose suivante : 

8 AL=ABS{SIN(PEEK(18)+PEEK(19) 
+PEEK(20))) 

Mais rien ne nous garantit que les résul- 
tats vont être homogènes. 


Vérifions-le avec un petit programme qui 
va nous en convaincre en nous affichant 
la répartition des résultats : 


S DIM RC10):?7"NOMBRE D'ESSAIS”; 
: INPUT N 

6 FOR I=1 TO S:RCI)=#O:N.1 

7 FÜR I=#1 ID N 

B AL=ABSCSINCPEEK(18)+PEEK(19)+ 
PEEK(20))) 

10 A=INTCAL#S) 

11 RCAD=RCAD+1 

15 N.I1 

20 FOR I=1 TO 9:?71;”->";INTCR 

(12/N#10000+.5)/100,"%":N.1 


Nous voyons en exécutant le programme 
que les résultats sont très inégaux, de 
plus il ne sort presque jamais de 9, ce qui 
veut dire que AL est très rarement égal 
à 1. 

Modifions la ligne 8 de la façon suivante : 
8 AL=ABSISIN(PEEK(18) + PEEK(19) 
+ PEEK(20)))-. 000001 

Ainsi AL ne sera jamais égal à 1 ce qui 
nous rapproche de RND(0) 

Il nous faut donc aussi modifier la ligne 
10 : 

10 A=INT(AL*10) 

Essayons.…. 

Encore des résultats hétérogènes. L'algo- 
rithme est trop simple. Compliquons le un 


peu. 

8 AL=ABS(SIN(LOG(PEEK (18) + PEEK 
(19)+PEEK(20))*150)): IF AL>=1 
THEN 8 


La formule mathématique idéale reste à 
trouver mais l’on peut dire que nous 
avons reproduit l'instruction RND en imi- 
tant la démarche de l'ordinateur... 
Franck JEANNIN 
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LL a LISTING En 


Vous disposez, avec POKEY, de trois outils pour mieux 
exploiter les listings parus dans ce numéro : 
e Le tableau ci-dessous qui vous dit comment obtenir 
les caractères graphiques spéciaux qui émaillent de 
temps en temps les programmes que nous vous propo- 
sons. 
e Un vérificateur de listings pour ceux qui possèdent 
un lecteur de disquettes. 
> Un vérificateur de listings pour ceux qui possèdent 
un lecteur de cassettes. 
rochain Ces deux programmes sont publiés dans le présent 
En attendant EV numéro. Ils vous permettent de savoir dans quelle ligne 
vous avez fait une erreur. Usez-en, avant de conclure à 
TRE SERV EUR une faute de frappe de notre part. La manière dont nous 
\0 ITEL fabriquons le cahier des listings rend hautement impro- 
MIN bable cette éventualité. 
paites le 36.15 KEY Enfin, si vous vous sentez paresseux pour taper les 
ettapez $ sm * P listings, vous pouvez vous procurer auprès de Pressi- 
mage la disquette qui contient tous les programmes de 
POKEY 


MODE D'EMPLOI 


TABLEAU N° 1 
TABLEAU N°2 





REGISTRES DE COULEUR Page 18 


Les programmes qui vont avec l’article de la page 14. 


MINI- GOLF 


Un programme de mini- golf, quoi ! 


SPY PLANE Page 21 


Un jeu d'arcade qui consiste à déplacer un avion dans 
sept tableaux plus difficiles les uns que les autres. 


MINEUR Page 24 


Bon, alors, euh. C’est un peu Dig-Dug, un peu 
Boulderdash et c’est un mineur qui creuse et qui récupère 
de l’or, enfin, tout Ga, quoi. 


NUMERATION Page 26 


Jeux sur les nombres en tous genres. Excellent pour 
apprendre à compter! 


ALGEBRE DE BOOLE Page 29 


Le programme d’accompagnement de l’article de la page 
à 


Page 19 


MUR Page 30 


Un casse-briques. Oui, un normal, classique, quoi. 


GARDIEN Page 31 


Alors là, c’est très particulier. Vous êtes un machinet 
vous devez dégommer des trucs. Pas banal, hein? 


TRUN Page 32 


Un jeu inspiré du célèbre Tron. Evitez les murs et 
l'adversaire, sous peine de mort. 


Tous ces programmes se trouvent dans la 
disquette de Pokey N°3, que vous 
trouverez en vente à la boutique de 
Pressimage. 

Ainsi, vous n’aurez même plus besoin de 
les taper! 


NER IMPERATIVEMENT 
AVEC NOS LISTINGS. 


l. Autorisation de publication 
sans contrepartie financière. 

Il doit être clairement posé que 
cette publication n'entraîne au- 
cune contrepartie financière di 
recte ou indirecte pour l'auteur. 
2. Absence de recours contre 
les tiers et contre PRESSI- 
MAGE. 

L'auteur du listing reconnaît 
que la publication de son 
œuvre a pour effet de la mettre 
dans le domaine public et re- 
nonce a tout recours contre des 
tiers et/ou contre PRESSIMAGE 
pour utilisation totale ou par- 
tielle de cette œuvre. 


Fait à . 
Le 
Lu et approuvé 


Signature 


(Signature des parents obligatoire pour les moins de 
18 ans) 


Titre du programme : 
Programmation 
O Cassette [ disquette 





Nom 

Prénom 

N° de téléphone 
Adresse 

Code postal 
Ville 


Date de naissance 








À RENM M'RSAUNECYENUT MODE LOT OT 
2 REM LICE EENICTEE EI NL ITT TTL 
28 FEEC TA RSSSERSUPETRMME ANR SR RSR 
PORTE LILI SATEON D UE ul 
S REM METTENT EMMENTI TT SN 11 "T NN 
6 RE VOSNNNNNRRR IC LR ES CU ORNE 
7 REM 

8 REM AFFICHAGE POINT PAR POINT 
9 REM 

18 REM 

LL REM RCTUD 

12 RE 

15 GRAPHICS 23: COLOR 1 

14 SETCOLOR 1,6. 

15 SETCOLOR 9,6. 


29 FOR I=15 TO 
*:12:NEXT T 
59 FOR 2Z=41 TO r:PLON 


2T:PLOT L,S5:DRANTO I+6 


28,1I+*12:DRAMTO FS 


HILL LAS DRAMTO S7#LI"1,6,2S!DRAMNTO TT 


#L SR: CDRAMTO 24H+L NT, T4tT 

46 NEXT T 

56 FOR Ti1i TO 7 STEP O0.S!:PLOT 5S6#+X,12#+ 
L'CRANTO 660#+1, TO: DRAMTO SB#+I  SS+X"/2:LR 
ANTO 484+T1,324L"/S:DRANTO G4rL”/2, 1147 

69 MNEXT TI 

65 FOR Ii TO :FLOT 621, 4B8:DRAMTO 75 
FI. LD ':NENT ZT 

67 FOR L=1 TO 1PLOT GÈH+T, 9: DRAHTO 
I,SO: DRANTO S7+L AG IMNENT TZ 

70 FOR I=1 YO 7IPLOT 120, P*L:DRAMTO 10 


TÉ+r 


S+L/2,84+L:DRAMTO 1O0$+T, 45: DRAMTO 1214, 4 
G-L:MENT ZI 

75 FOR I=i TO 7:PLOT 106,23+L:DRAMTO JL 
23,21+X:NEXNT ZI 

86 FOR Izi TO 6 STEP 6.489:PLOT 135.4+ 
LL, SS+LI:DRAMNTO LS2Z LT BHI:NENT ZI 

90 FOR I=1 TO 7:PLOT 137+LI,8+1/2:DRAMT 
O0 148,3G6:NENT ZI 

95 COLOR 2? 

106 FOR I=zi TO S5S00:HZINTERND CO 1559 + 
Si:V=LINTCRNDCODMS234+GH:LOCATE X,Y. E:XF E 
=i THEN PLOT K Y 

101 REM CTTENVYÉEIM: REMPLACEZ DANS LA L 
IGNE PRECEDANTE PLOT *X,Y PAR PL.M-1,%: 
DR HtL VIPL MH YHLI DR .K YT1 

102 REM 

119 SOLND 6,RNDCOI#45,6,2:NENT z 

129 SETCOLOR 6,8,8:SOUND 6o,6,6.60 

125 FOR 1=1 TO 255 STEP 4: SOUND ©,1,106 
6: SOUND L,LI+2,4,4:NENXT L:SOUMD 6,9,0, 
8:SOLUND 1,9,0,6 

35959 GOTO 9293 


41 DAté S5216,H060, 4260, 4S%40,4995, 4663, 2 
6H,1993,269, 260, 51905 

11 DATA 2043,260,1248,906,6658,2809%,568 
Brdéd,64YL, A24,2718#78 

65 DATA 2918,5799,50564,2995,4024,#059, 
465,5885,7S59%,260,35552 

Li DÔTA 16%5,1706,5179,516, 98H96 





nl 
CERN UP ELISA ELRON CE ERP ee 
CRE PES RER TRE DE eee] 
REM É 

REM 
REM 
REM 
REM 
REM POKEY F.JÉANNIK 

190 DIM À5C40)2 : GRAPHICS 
, 6 

25 FOR ZT1 TO 9 
36 READ à4S:POSITLION -LENCASI/2+10,10:7 
HG) ASIFOR L=9 FO 1L4:SEFTCOLOR 9,0,T:F0Q 
R H=1L FO 1O:NEMT KIMNENT L:FOR Ii T0 7 





AFFICHAGE SOIGNE 
PAR DEGRAPE PROGRESSIF 


YOHENTDUAUN M 


1A7:ISETCOLOR 0,0 


O9: MNEXT TI 
40 FOR Zz1i4 T0 O0 STEP -1:$ETCOLOR 9,9, 


L:FOR X#=1 TO 10:NEXT HINENT ZX 
45 POSITION 0,10:7 #63"! 

.. 
SO NEXT Z:RUN 
108 DATA POKEY,LE JOURNAL DES, FANATARX 
QUES,EN VENTE DANS, TOUTES LES,BONNES L 
IBRAIRIES,25 FRANCS, ::.,:.. 





L BAIN AÉGO, SABLE, HET, AERUNE , À 205 CRE Er à À 
ILE + Zn, AÉLE GE, TOME 7 

LS DAVR PAT, PEU, AE, AISÉE, 776, 6644, ZE 
4 LA 











REA Enr A PRG LE 

CPR DTIL FEAT TON ON LME 

CERRPDES FECTSTRES DE 

REM MAIN MMA 

REM CRÉATION D'UNE PSEUDO -ANIMATION 
REM PAR ROTATION DE COULEURS 

REM VOL D'OISEALUX EN CADENCE 

REM x 
6 REM POKEY ,F1 1286 


By un 


12 GRAPHICS 19 

15 FOR 2:56 TO 4:SETCOLOR X,9.O0:NEXT I 
17 FOR L=1 TO 1T:MH=L2HINT CRND COD3 592 :Y%= 
ZOXINTLRND COD #7. 52 

20 COLOR 4:PLOT 1LO+H,194+Y: DRAMTO 15+H, 
L7+Y:DRANTO 204+K,10+% 





25 COLOR 5 

3596 PLOT 160+K,14#+Y:DRAMTO 15+K#,18#+Y:DRA 
MTO 20+Kk,14+Y 

35 COLOR 6 

49 PLOT 18+K#,20+%:DRANTO 15+K,19+Y:DRA 
WMTO 290+K,20+Y 

45 COLOR 7 

56 PLOT 11+H,25#+Y:DRAMTO 15+KX,26+Y:DRA 
MTO 19+H,25+% 

69 NEXT I 


Di ONE ennns 

REM MR ET EN CL US IT 

REM CIS ENT EEN  N 

REM ACL RER 

LL CT Po SE M | 

REM CREATION D'UNE PSEUDO-ANIMATION 

REM PAR ROTATION DE COULEURS 

REM VOL D'OISEAUX LDECALES 

REM 

19 REM POKEY ,FJ 1986 

12 GRAPHICS 19 

15 FOR I=6 TO 4:SETCOLOR I,9,O:MEXT I 

17 FOR I=1 TO 13:H=12#INT CRND COI SI: Y= 
ZOHINT CRND (O2 7.5) 

18 C=INT CRND CO #42 +4 

26 COLOR C:PLOT 10+H,10#+Y:DRAMNTO 15+K, 
17+Y:DRANTO 20+H,10+% 

25 COLOR C+1-4KCCC4+19>72 

36 PLOT 10+H,14+Y:DRAMTO 15+H,18+Y:DRA 


VONDUAUN 


MINIS 


19 REM MINI-GOLF F. JEANNIN 1784 
29 REM 
39 REM 
40 REM 
50 DIM MIMIS(C202 : MIMIS='" mini 
69 DIM TIR(C40) 

78 GRAPHICS 18 

86 POSITION 9,4:7 H6:''C1'"°: FOR I=1 TO 5 
BO:NEXT ZI 

90 FOR I=8 TO 4 STEP -1:POSITION I,4:7 
#6 ;: "ON: MINIXS CL, ABS CIK2-1833;''l': FOR T 
=1 TO 10:GO0S1UB 260:NEXT T 

109 FOR TI=1 TO 10:SOLND 2,165,12,12:N 
EXT TI:SOLUND 2,9,0,0:NEXT I 

110 FOR I=1 TO 50:SETCOLOR 1,INT CRND CO 
2#1293 ,INTCRND CO)#10)9 : GOSUB 2Z6O0:NENT TI 
129 POSITION 0,0 

130 FOR N=1 TO 20:?7 H6:''MOINES (SOUrF 
SETCOLOR O,INTCRNDCO2#1293 , LMT CRMD (OI #S 
2+S:FOR I=1 TO 2:GOSUB 260:MENKT L:NENT 
F4 

149 FOR I=1 
2#123,5:FO0R 
:MNEXT I 

150 GRAPHICS 17:FOR K=1 TO 8:POSITION 





3go1rF'* 


.. 
2: 


TO 12:SETCOLOR 4,INT£CRND CE 
T=1 TO 14:GOSUB 2GO:NEXT T 


H,10:7 H6G;''M'°: FOR I=1 TO 19:GOSUB 260: 
NEXT I:POSITION X#,10:7 H6;'° '":NEKT XK 
169 POSITION 8,19:7 H6:;''M'': FOR Y=1 TO 


19: POSITION 9,Y:7 H6:''L''°: FOR I=1i TO 10 
:GOSUB 26O0:MNEXT I:POSITION 3,Y%*:7 H6:° 
"1NENT Y 

1796 POSITION 93,10:?7 H6:''°1L° 

186 POSITION 9,10:7 H6;''L'": FOR Y=1 TO 
160:POSITION 19,Y:7 H6:''N'': FOR I=1 TO 2 
:GOSUB Z6O:NEXT I:POSITION 10,Y:7 H6:" 
"©: NEXT ŸY 

190 POSITION 19,10:7 H6:''N'" 

266 FOR M=19 TO 11 STEP -1:POSITION K, 
16:7 H6:''L'': FOR I=1 TO 7:GOSUB 26O0:NEXM 
T I'POSITION MH,10:? H6:'° "":NEXT 4 

216 Y=26: POSITION 11,10:?7 H6:''I° 

220 FOR H=96 TO 8:Y=Y-1:POSITION X,Y:7 

#6 :'(AIMS'': GOSUB 260:POSITION KX,Y*:7 H6:; 


166 FOR 1-0 
Z,:9,68:NEXNXT 
TO 190:NEXT 
999 GOTO 9329 


TO S:FOR Z=9 TO 4:SETCOLOR 
Z:SETCOLOR I,2,10:FOR T=1 
T:NEKT I:GOTO 106 


1 DATA 3620, 445E, ATP, SHSO9, SOC, ZA, À 
970,1876,260,117270, 27525 

12 DATA 722, 2L72,5106,85692,A406, 2286, dé 
9,2981,470,2992,198686 

660 DATA A424,64851,S516,7&r71 


WMTO 260+K,14+% 

SS COLOR C+2-4#0CCC+#+232>7)9 
46 PLOT 10+K,20+%:DRAMTO 
WMTO 20+K,270+%Y 

45 COLOR C+F-4#CCC#+232>7) 
S6 PLOT 11+H,25+Y:DRAMTO 
HMTO 19+KH,25+Y 

69 NEKT I 

166 FOR I=90 TO S:FOR Z=9 TO 4: S3ETCOLOR 
Z,;,6,6:NENT Z':SETCOLOR I,2,10:FOR T=1 

TO 1O06:NEXT T:NEXT IL:GOTO 106 

99293 GO0T0. 299 


15t+H,193+Y:DRA 


15+K,20+Y:0RA 


41 DATA 3620,4452, ALES, SE, HÉ2O, AA, À 
9370,1711,269, L1I29,27358 

12 DATA 722, 2172, SAOË, 299, SSL, LL, &% 
86, 1155, 2981,1155, LIVIXSS 

59 DATA 29928,484, GASL, 516, 19565 


BUT 


":NEXT X 

239 POSITION 8,12:7 H6:''(AIMS': FOR I=1 
TO 200:SETCOLOR 6,7,8:SETCOLOR 2,1,9%:F 
OR T=1 TO 20:GOSUB Z60:NEMT T:S5ETCOLOR 

2,7,/80:SETCOLO 
246 GOTO 79 
256 REM 
2690 SOUND 9,IMT CRND CO2 #50) ,10,4:21F 
KCS32793=6 THEN GOTO 280 
279 RETLRN 


PEE 


2890 FOR I=1 TO 259 3TEP S:SOLUMD O©,1I, 14 
10: HET L:SOUND 60,9,0,0 

299 REM 

S00 REM - 5<H<155 EXT É75 

S190 SOUND ©0,0,0,0:S=OUND 1,0,9,0 

326 TOTAL-O 

339 RESTORE 1750:FOR T=1 TO 3532:READ A: 
TIRCTI=A:NENT T 

340 SENS=1 

356 Ccou-? 

366 TROU—-1 

370 FIM-0 

589 GRAPHICS 7 


3990 SETCOLOR 4,11,2: SETCOLOR 
ETCOLOR 1,3,6:SETCOLOR 6,8,10 
400 REM £<< L 225 

419 COLOR 2? 

429 FOR 1-19 TO 
» L:NEHT ZT 

439 COLOR 3S:PLOT 46,14:PLOT 47,14:PLOT 
46,15:PLOT 47,15 

440 KH=14:Y=114: COLOR 1:PLOT H.,%Y 

450 COLOR 1:PLOT 6,14:DRANTO 68,12:DRAb 

TO 8,18 

469 GOSUB 19076 
479 REM <<< 2 
469 CPT-0 

4990 COLOR 7? 


Z,15,10:5 


ZD:PLOT 19,T:DRAMTO 50 


S5DY 





19 


20 


5909 PLOT S5,19: DRANTO 76,10:DRANTO 78, 
ZY: DRANTOT 787 T07 DRAATO 73: 528 — - - 
S19 DRAMTO 65,56: DRANTO 6%, 40: DRAMTO T 
&,4O: DRAMIO 354,375 


520 DRANTO 56,50: DRAMTO 69%, TO: DRAMTO 6 
S,20:DRANHTO 55,279: DRAMTO 55,10 

SS6 PLOT F8, SO:DRAMTO 77,S0:FOR LI=6E T 
O0 58 STEP LI:PLOT L,4O0:DRAMTO IL,56:DRA 
MTO 25,35:PLOT L,IO:DRAMTO 355,IS:NEHT 

ps 

540 FOR I=19 TO 2O:PLOT 
LIL DRAMTO 76,16:NEXT ZI 

SSH FOR 12:63 TO 76:PLOT 
:SP:NEMT ZI 

560 FOR T=T9 TO 37:PLOT 
» I DRAMTO 77, COMENT TZ 

579 FOR IL=73 TO 77:PLOT 
ABG:NEXT I 


S6,I':DRAMTO 70 


T,1G6G: DRANTO 73 


GT, TI: DRAMTO 73 


T,SO0:DRANTO ZT, 


580 COLOR 1:PLOT 29,34:PLOT 20,T3:PLOT 
SL,35 
S99 PLOT 3S2,Z4:PLOT 32, 3S:DRAMTO 29,38 


1DRANTO 32,58 

600 H=S7:"=15: COU:2Z: COLOR L:PLOT K,V: 
OLOR S:PLOT 36, S4:PLOT 38,SS:PLOT 359, 
S:PLOT 59,74 

61e COLOR G:PLOT 45,40:DRANTO 52,37:D8R 
AHNTO 60,41 

620 COLOR O6:PLOT 
AMTO 60,539 
650 GOSUT 


u 


145,50: CRAMTO 52, 335:DR 


1029 
640 REM €<€ 3 22>> 
650 CPT-H 
660 COU=?: 
670 COLOR Z2:FOR I=S TO 15:PLOT L,F0:DR 
AMTO I,SS:DRAMTO 10, 7O:MEKT ZX 
680 PLOT 9,69:PLOT 11,69 
696 COLOR L:PLOT 10,F2:H=10:V=SZz 
7609 COLOR S:PLOT 9,50:PLOT 10,50:PLOT 
9,SL:PLOT 10, 521 
710 COLOR D:PLOT 7, 45:DRAMNTO 15,45 
729 COLOR L':PLOT 19,680:PLOT 11,60:PLOT 


12, 5S9:PLOT 127, 58:PLOT Li, 57 :PLOT 10,5 
7IPLOT 9,56 
758 PLOT 12, 6L:PLOT 
LOT 190,653:PLOT 9,627 
TA GOSUB 1020 
758 REM <£&<< 4 
769 CPT-:HD:COUZ? 
779 COLOR Z2:FOR I=:50 TO 7O:PLOT 
DRAMTO SO0,L'DRAMTO 80,60: NENT ZI 
7609 H=S5S:#":660: COLOR L':PLOT M,Y 
790 COLOR S':PLOT 79,66:PLOT 71,60:PLOT 
79H,59:PLOT 71,59 
800 COLOR O:PLOT 59,S6:DRAMTO 65,58:PL 
OT 59,62: DRAMTO 65,6% 
819 PLOT 45,55S:DRAMTO 45,65 
820 PLOT 58,6L:DRAMTO 590,59 
68:80 COLOR 1:PLOT 356,51: DRAMTO 39,SL:PL 
OT 386,48:PLOT 37,49: PLOT 36,50 
640 PLOT 3%, S0:PLOT 58,52 
850 GOSUR 1070 
6869 REM £L£é 5 >>> 
87e CPT-0:COU=2Z 
880 COLOR Z:FOR I=:105 TO L1S:PLOT Z,410 
IDRAMTO L,6D:MNENT ZI 
890 FOR 12:59 TO S5S:PLOT 90,L:DRAMTO 14 
G,L:NENMT I 
300 COLOR O0:FOR LI=1 TO 28:PLOT INTCRMD 
COM 1093 +105, INT CRND CO #70) AO: MENT ZT 
919 COLOR 1:PLOT 92,62:H=292:V=5S2: COLOR 
S:PLOT 15$5,92Z:PLOT 176,S2:PLOT 135,57 
2PLOT 156,53 
926 COLOR L:PLOT 968,40: DRANTO 95,40:0R 
AUTO 95,42: DRAMTO 97,42: DRANTO 98,43:D 
RAHTO 96,44:DRAMTO 97,4S:DRANTO 95,45 
95:90 GOSUB 1029 
949 REM <<< 6 >>> 
259 COLOR 2:FOR I=:88 TO 132:PLOT I,5S:0 
RAMTO L,IA: MENT ZT 
9360 COLOR OG:FOR I=1 TO 190:PLOT INTCRNDO 
CO3 #40 +930, LMT CHMD CODIK303+2: DRAMTO IMT 
CRHD CO) #2093 +956, INT CRND CO) #16) FO: MEXT ZT 
979 COLOR L:H=IMT CRME CO) 403 +90:WY=IMT C 
RNDCOIK25)3 +5: PLOT K,Y 
980 COLOR F:HLTIMNT CRND COI #40)2 +90 :Y1=IN 
TCRMD COS 299 +5 :PLOT KH1i,Y1:PLOT HKH1i+1,Y1 
3 PLOT X1,Y1+1L:PLOT H1t+i,YLi+i 
999 COLOR L:PLOT 12#,S:DRAMTO 126,S:DR 
AUTO 120,19: DRAMTO 125, 10: DRANTO 12%,7 
ÉDRAHNTO 126,7 
1900 CPY=-6:COUZ-Z:GOSUB 10270 


12,62:PLOT 11,65:P 


>>>> 


390,60: 


1010 FXIM=1 
1929 REM A TIR SNS 
1059 IF FIN=1 THEN GRAPHICS 17:7 H6:"'T 


OTAL :'":TOTAL:? H6:7 H6:''MOYENNE 
TAL/6:GO0OTO 17890 

19040 REM 3 

1050 SOUND +,9,0,90:SOUND 1,0,0,0 
1969 Yi 

1870 CPT=-CPTH+L:IF CPT>26 THEN CPT=:6:GOT 
0 1620 


22e 





1050 7 27 17 COUP :'SCpr3" 
TOTAL :‘°:TOTAL 

1896 SOUMND 9,140,10,2 

119090 S=STICK CO) 

1110 IF S=11 THEN T1=T1-2? 

1120 IF 5S=7 THEN Ti=T1+2 

1150 IF TLSL THEN T1i=X1 

1140 IF T1>31 TMEN T1i=1 


1150 COLOR 1L:PLOT 150,10 

1169 DRAMTO 1564 CTIRCÇCT1I“K7I ,LO0+CTIRCT1 
+13K79 

1170 COLOR 9D:PLOT 1560,10:DRAMTO 1504+CT 
LTRITAIKÉPI , 1O4+ CTIRÇCTL+1I3 #79 

1180 IF STRIGCOI=1 TMEN GOTO 1106 

1199 COLOR 1:PLOT 150,190: DRAMTO 1564+CT 
TIRCTAIKTI , 104+ CTIRLTL+LII TI 

1209 SOUME 6,144,6,6 

12196 LF STRIGCOI=L THEN SOUND 6,0,6,0: 
COLOR O:FOR I=S TO 17:PLOT 143,ILI:DRAMT 
O 157,L:NENXT IL:GOTO 1351:0 

12790 V=EVH+SENS 

1239 XF V>S0 THEN SENS=-1 

1246 IF VU6Z THEN SENS=1 

1250 COLOR 1:PLOT 10,F:DRAMTO 104+0,T 
1269 PLOT 19,5S:CRAMTO 19+0,5 

1279 COLOR B:PLOT 11#+V,I:DRAMTO 50,37:P 
LOT 11+VU,5S:DRAMTO 506,5 

1286 SOUMD 9,V,68,10 

1290 GOTO 1210 
1300 GOTO 1106 
1519 REM CCCcec 
132768 REM 

1550 -ULI=VML,75S 
15:40 LO=O 

1550 SOLUND 96,6,0,9 

1560 VARHE=ETIRCT1LI :VARYETIR CTL+1L9 

1570 COLOR COL: PLOT KH,Y 

1580 H=H#+UARH:VY=YFUARY 

135390 LOCATE K,Y,COu 

1498 LOZ=LO+9.S:IF LO>U THEN UVUI=9 

1410 IF COU=TS AND VI>7 THEN N=INT£CRMDC 
B3#15) +1: VARHETIR CME2I : VARY=TIR CNEZ+193 
14206 IF COU=S AND P=L THEN 7? ‘‘CRISMMENTT 
ChS Al: P=O0:CPT=-6: SOUND 1,167,10,10:F0 
R I=1 TO 600: MENT LI:GOTO 1620 

14560 IF COU=6 THEN P=1 

1440 IF COU<>O THEN P=0 

14596 IF COU=S AND VIS THEN TROU=TROU+ 


TIR 333939 


L:SOUND 35,14,14,19:GO0OT0 1626 

1469 IF COU<S>6 THEN GOTO 1536 

1479 REM  MHEM-M-M-ME-M-DE-DE-DE-É-Dé-Dé-Bet-Dé-Dé-Mé-ME-HE-DE-RE-DE-DEHE 

1489 SOUNMD 1,157,12,8 

1499 VILI=UI-2Z 

1500 1F VARH=O THEN VARY=-VARY 

1519 LF VARY=O THEN VARH=-VAREXH 

1576 GOTO 1550 

1559 LOCATE KX,YT+VARY ,DIR:IF DIRT=6 THEN 


VAR Y=-VJARYULIEUL-2: SOUND 1,206,8,10:7 
F VIK2Z THEN VrI=S 
1549 LOCATE H#UARH,Y,DIR:IF DIR=O THEN 
VARH=-VJARH:ULI-ULI-2: SOUND 1,266,10,8:7I 


°F VI<2 THEN VI=2.5 


15508 
1566 
1576 
1566 
AaATTrT 

15539 
16609 
1610 
16268 
163568 
1646 
1656 
16668 
1679 
QUES 


COLOR 1L1:PLOT 
UI=UI-1 

IF VISA THEN GOTO 16026 

FOR ATT=ZUI/6 TO CUK1,7S)2-VL:NEMT 


xX,Y 


SOUND 1,90,6,0 
COLOR COU:PLOT XKX,%Y 
GOTO 1:80 

REM 
REM #+#++#+ MUSIQUE +++ 

SOUND 5,0,6,9 

IF CPT>S THEN 1750 

RESTORE 1876 

FOR I=1 TO S6:READ FR:READ 


DU:REA 





1689 SOUND 6,FR,14,12:FOR Ti=1i TO DU/S 
SNEXT TL 

1699 SOUND 9,0,0,0:FOR I1=1 TO ES“6:NE 
KT Zi 
17068 
17168 
1726 
1730 
1740 
1750 


NEHY I 

REM 

REM 

TOTAL=TOTAL+CPT 

RETURN 

DATA -1,-1,-.5,-1,0,-1 

1760 DATA :5,-1,.1,-1,1,-.5,1,0 

4770 DATA 1. .#,1,1::5,1:0.1.-0.4, 172 
57 18e: ur, 5 

1780 REM FIN FIN FIN FIN 
IN FIN FIN 

1790 SOUND 6,9,0,0:SOUND 1,0,06,0:SOLUND 
2,0,9,0:SOUND 3,90,90,0 


FIM FIM FIN F 


1808 SETCOLOR 6,8,2 

1810 FOR I=1 TO ZOO:NEMT L:SETCOLOR 6, 
5,8 

1820 FOR I=:1 TO ZOO:NEXT LI:SETCOLOR 96, 
11,8 

1839 FOR I=i TO ZOU:MENT L:SETCOLOR 6, 
5,10 

1846 POSITION 18:77 146: ''CONAUIA EN" RE 


ARTE POUR RECOMMENCE 

1850 SETCOLOR Z,INT CRND CO) #1293 , LMT CRND 
(HIMHIOD:LF PEEKCSI279276 THEN RUN 

1669 GOTO 1850 

1879 DATA 96,100,50,126,50,25,10868,S06,5 
9,96,1900,50,96,100,58,81,56,25,91,S50,59S 
8,96,106,58 

18680 CATA 91,100,50,91,50,25,96,50,56, 
1608,100,50,96,100,590,96,50,25,108,50,5 
8,126,100,50 

1890 DATA 96,1060,50,126,50,25,108,50,5 
9,%6,100,50,9%6,106,59,81,56,25,91,50,5 
9,96,100,50,91,106,50 

19690 DATA 91,50,25,96,590,25,108, 
96,50,590,126, LOG, 500 


50,25, 





1 REM 

2 REM (NN SPY PLAME NE 
3 REM NM POKEY , LUS E 7 LIT 
4 REM (MN PRESSIMAGE A 
EL | 


SO REM 
60 POKE 764,158 

70 GRAPHICS 17:POSITION 90,5:7 H6:;"'" 
SPY PLANE':7 6: Frokery . FX 
n6:7 H6:7 H6;°" patientez -.-.àù 
80 FOR T=:96 TO £SS:POKE 741%,T:NEMT T:PO 
KE 715%,62:1FOR T:=9 TO 1LOOG6:MNEXT T 

930 GRAPHICS O:NB=7:POKE 559,0:POKE r71Z 
»:14:G0T70 5180 


106 GOSUE 5000 

110 KH=:96:T=8T:POS=PMD:SCRE=L 

129 GHAPHICS 18:POKE 756,PEEK£CLOGI+1:F 
OKE 559,46:FL=-9,.1 

130 POKE TilL,14:POKE 708,56:POKE 716,3 
G:POKE 712,2 


1490 1F FLAG=O TMEN FLAG=1:GO0OT0O 2619 
1586 GOTO 4170 

1990 SEZSTICK COD :H=M#CSZ 
HB—-CSEILL OR S-719 OR 3= 
206 Y=TYT+ES=15 OR 5=S OR 
R S=190 OR S-6)#8 

219 IF S=7 OR S=6 OR 
229 IF SZL1L1 OR S=11 OR 5=10 OR 
NW POSs=PMC 

230 IF H=:08 OR H=40 THEN 4% 
249 AE=USRIMOUE,O0,PME,POS,H.Y, 6) 
256 LOCATE CK-482/8, CY-1893/8,C:LF CCS 
2 THEN 549 : 

260 ON SCR GOSUB 640,716,840, 999,110, 
LLTFORSRÉLOU Us | 


F7 OR S=6 OR 5-59 
338 
S=9)2#B-(S=14 O 


S=S THEN POS=PMD 
S29 THE 


276 GOTO 1990 

349 IF C=249 THEN S76 

356 POP :D=:TA44:POKE 552768, 0 

369 MN=MN-L:IF MN=O9 THEN 299069 . 
370 FOR K=Y TO +18 

5856 A=USRÇCMOUVE,0,PMB,D2,KH,K,8)3 


18 DATA 1LH4Y,26B0,6197,260,2267,676,7%6 
:2"29,6168,N750,24794 

118 DATA 4354,#01,7308,4932,6707,V24%8, 
1FO1,7276,1846, 6447, 47717 

218 DA 1649,5B611L, LH49B,448,260,3424, 
S1r,34890,2606,1296, 27687 

519 DATA 1557,497, 2148, AËS, SAZ, 440, SX0 
660, 19Ed, 749, 12099 

AR DATA 465,2697,S110,1711,2586,611, 8 
62,340,465,3626,1667% 

S10 DATA 3169,3965,6896,YS519,2760,3528 
» PT2A,24S6,7877, 5299, LITA1TS 

G1M DATA 273B,2724,611,7A41,3SAD, S42, 396 
6,1225,1728,2992,1741% 

716 DATA 1880,5028,I176,611,6864,740,46 
65,1715,3116,3409,24606 

1 DATA L1417,1409,3928,1266,61L1,74X,7 
4U,33#0,2765, 4196, 20405 

91LD DATA S116,6824,611,744,3245,6S74,% 
386,6136,S2L%,1409,3597258 

1619 DATA SS1,1119,5295,260, 1568, 196, 2 
S12,2628, 901,655, 15457 

LiLLG DATA 1206, L161,1076,1080,1L164,2#% 
B,Y449,1713,5450,866, 17895 

1219 DATA 5676,569,1259,1161, 1941,142% 
» SAFL, E4d,5S41,559%,17598 

LES DATA 968,266,551,264,749,18?1,127 
6,126%3,968,1732, 9662 

1419 DATA 44237,78995,1072,114%2,S817,148 
92,1268,918,474,1722,24104 

1519 DATA 1721,54B,S64%,5787, 1094, 4YX, 
1Y550,2502,750,12;6,20689% 

1618 DATA 549,1295,11Y5,7H2,1091,788,2 
SSL,2SAR, 2ILS, 424, 1YSAL 

1716 DATA 260,260,1111,S12,1102,1748,2 
AB2,2758,2176,693,15782 

LEO DATA 22H55, 23500,2296, 8059, 4047,551L 
,4AUBS,4126,4567, 2672, S49%A 

1810 DATA 2251,2500,2296,80839,4047,551 
ABS, 4126,4567,2672,34934 


LAME 


5950 
400 
416 


AZ=USR CMOUE,0,PMB,D1,H,Y-CK-Y2 , 82 
SOUND @,RND CODM14,0,1L4:MNENXT K 


ATUSR£CMOUE, 9, PMB,7Z,06,0, 8) 

429 ATUSRÇCMOUE,60,PMB,Z,6,0, 8) 

450 POKE 704,621FL=-0.1:1F STRIG (O2 21 
THEN 116 


4490 GOTO 2720 

450 REM 

469 REM 

470 REM 

490 IF X=208 THEN SCR=SCR#+1L:H=48 

500 POKE 77,9 

S190 IF K=40 THEN SCR=SCR-1:H=-206008 

S26 A=LUSRÇCMOUE,6,PMB,POS,H,%, 82 

53539 POSITION 6,6:SOUND 6@,6,8@,6:POKE 55 
3,0 

S46 GOSUB SCRHLAO+LLIO: POKE 559,46 

S50 IF SENMI=SCR THEN COLOR 249:E=SCRK 


2:PLOT PCE-12 ,P CE) 

5696 FL=-0,1:GO0T0 196 

5790 FOR M=14 TO © STEP -1:SOUND 6,100+ 
W,14,M:SOLUND 1,100-H,14,H:MNENT H:NM=NM 
+1:5C-5c+10 

5686 IF NM=8 THEN 2440 

5990 COLOR 32:E=-SCR#Z:PLOT PCE-12 ,P CE) : 
GOTo 190 

669 REM 

6190 REM 

629 REM 

649 FL=FL+O.1:1F 
656 IF FL=9 THEN 
669 IF FL=1 THEM 
679 IF FL=2? THEN 
686 IF FLTY THEN D=245:SOLND 
6996 COLOR D:PLOT %,7:RÉTURN 

716 FL=FL+L:IF FL<MU THEN RETLRN 
7296 FL=0 


FLiSs.9 
D=244 


THEN 
SOUND 
D=245:SOUND 
D=246 : SOUND 


FL=e 

9,36,4,2 
8,25,4,2 
O,54,4,2 
O,S5,4,2 





21 


2 


730 E=INT CRND COD#SDI+1L:IF E-1 THEN E=81 
1PH=7:PY=S:PD=11:PE-1 


748 IF Ez=2 THEN E=79:PH=17:PY=10:PD=6 : 
PE=4 

750 IF E=S THEN E=80:PH=16:PY=9:PD=16 : 
PE=6 

769 IF E=4 THEN E=80:PHX=17:PY=9:PD=17: 
PE=S 

776 IF E=5 THEN E=80:PH=18:PY=9:PD=18: 
PE=2 

789 COLOR E+169:PLOT PX ,PY:DRAMTO PD,P 
E 

2790 FOR T=14 TO 9 STEP —-1: SOUMD 6,7T,2, 


T'HEXT T 
869 LOCATE 
2 THEN 540 
810 SOUND 96, 
DRAMTO PD,PE 
829 RETURN 
840 FL=INTCFLI+1:IF FL<MU THEN RETLURM 
6856 IF FL=290 THEN FL=999:T=INT CRMD CO # 
93+1:COLOR 87:PLOT T#2,9:SOUND o,RNDCO 
2#100+155S,8,7:RETURN 

860 IF FL=1002 THEN COLOR 88:SOUND O,R 
ND CO2#100+155,8,14:PLOT TK2,9:RETLURN 
870 IF FL=1003 THEN COLOR 87:SOUND 6,R 
ND (O02#100+155,8,14:PLOT TK#2,9:RETURN 
880 IF FL<1006 THEN RETURN 

890 COLOR 32:PLOT T#2,9:SOUND 6,0,0,0: 
FLE(T#2)#6+46 

906 FOR T=8 TO 1 STEP —-1 

919 SOUND B,14-T,0,14-T:PE=-96-C8-TI:4A— 
USR CMOVUE,1,PMB,PME,FL,PE,8-7T2 

9290 NEXT T 

9306 FOR T=88 TO 22 STEP 
1,PMB,PME,FL,T,82:NEXT T 
946 A=LUSRCMOUE,1,PMB,2Z.0,6,8) 

950 IF PEEK(S32660)2>90 THEN 540 

960 FL=0:SOUND 9,9,90,6:RETURN 

9806 FL=FL#+L:IF FL<MHU THEN RETURN 

9390 T=INTCRNDCOD)M6)I#+L:IF T=1 THEN PX=1 
1PY=9:PD=L:PE=1: bD-208 


CH-482/8, CY-182/8,C:1F C<dS 


6,9,9:COLOR S2:PLOT PH,PY: 


—4: A=USRCMOVE, 


10006 IF T=2 THEN PH=2:PY=9:PD=2:PE-=2:D 
=208 

1616 IF T=S THEN PH=7:PY=8:PD=0:PE=1:D 
=207 

16026 IF T=4 THEN PH=1S5:PY=4:PD=14:PETS 
1D=207 

1939 IF T=S THEN PH=16:PY=4:PD=14:PET72 
:D=2067 

16040 IF T=6 THEN PH=12:PY=9:PDz= 12:PE=7 
1D=208 


1059 SOUND 9,16,4,14:COLOR 
Y:DRAMTO PD,PE 

1660 FOR T=14 TO 7 STEP 
ss TINEXT T 
1979 LOCATE 
32 THEN 349 
1080 COLOR 32:PLOT PH,PY:DRAMTO PD,PE: 
SOUND 96,0,0,0:FL=-O0:RETURN 

1106 FL=FL+L:IF FL£<INT CRND CO2 “103 +4 TH 
EN RETURN 

1110 SOUND 96,255,6,14:1F INT CRNMD CO #22 
=1 THEN COLOR 87:GOTO0O 1150 

11206 COLOR 88 

11:06 PLOT 8,S:DRAMTO 8,1 

1140 LOCATE CKH-482/8, CY-182/8,C:1F c <> 
32 THEN 340 

1150 COLOR 32:PLOT 8,5:DRAMTO 8,1:SOUN 
D 6,255,8,2:FL=-0:RETURN 

11790 FL=FL+1L:IF FL<HU THEN RETURN 

11890 T=INTCRNDCODK9D4+1L:LIF T=1 THEN PH=- 
9:PY=4:PD=11:PE=2:D=209 


D:PLOT PX,P 
-1: SOUND 6,7T,4 


CH-482/8, C(Y-182/8,C:IF C<> 


1196 IF T=2 THEN PH=10:PY=:S:PD=12:PEzS 
10-209 

1260 IF T=3 THEN PX=10:PY=S:PD=7:PEz-Z: 
D=267 

1216 IF T=4 THEN PH=11:PY=4:PD=10:PE-S 
:D=2067 

12206 IF T=S THEN PH=15:PY=9:PD=1S:PEz1 
:D=208 

1230 IF T=6 THEN PH=16:PY=9:PD=16:PE=S 
1D=208 | 

12490 IF T=7 THEN PH=17:PY=9:PD=17:PE=1 
1D=268 

12506 IF T=8 THEN PX=18:PY=9:PD=18:PEz 
1:D=208 

12696 IF T=9 THEN PH=19:PY=9:PD=19:PE=2 
10=2:08 


12790 COLOR D':PLOT PK,PY:DRAMTO PD,PE 
1280 FOR T=109 TO 9 STEP -16:SOUND 96,7 


»14,14:NENT T 

1296 LOCATE CH-483/68, CY-183/8,C:1F C <> 
32 THEN 5340 

1300 SOUND 9,9,0,0:COLOR 52:PLOT PH, PY 
:DRAWNTO PD,PE 








1310 FL-0:RETURN 

1330 ? H6:;:LGOS ; 

1340 7 H6: 

1350 7? H6:'{ICE CE CE CÉ CE 

1360 ? n6:''7 

1370 7? H6:'0 

1380 ? H6:''09 

153990 ? n6:;''7 

1400 7 H6:'' 3 

1410 7 46:09 GE 3 
14260 ? n6:'' FAAAAAH QUE 
1470 7 16; '"'AMATAARAARNAAAARAARAAANS 
1446 ? H6;:LG2$S; 

1450 RETURN 

1470 ? 16; ''(1INANAAAN D DDDDDDDAA"": 
1480 7 H6:'" C(111499E Ca!''; 
1496 7 H6:;°° CAAAIE ee GG GP) c'°3 
1506 7? H6:°'' CIANE GCLLLLLIU ‘5 
1610 7 He: CE CILTALTT AA CE 
1520 ? 46:;'"° CLLLLILT14 ES 
1530 ? #6: Ca 2 CLLLTAS Le 
1540 7? H6.° FAAH CCTLILS A 
1550 7 46," CLLTAL CE] A, 
1560 7 H6:'  LTTITTN) 2 
1570 ? 46:'" MLATLTTTIM) [FUNCIE 
1580 ? n6: "AL TLETIMEMTAAS CLLLLN)" ; 
1590 RETURN 

1619 7 H6;°'" 5 D b  Erbeis te bb bb b bb bi 
1629 ? H6:'' = (b] Œœ 
1630 ? n6:;'° © 2 a 
1640 7 n6:'" 9 © BEBE E 
1650 ? #6;'° ® EE © © Bb] 
1669 7? H6:;"'' Es BBEse (E 

1670 7 H6:;°!' BG eCGE Œ (B] : 
1680 7 H6:°'' a © EEE 3 
1690 7 H6:'' © © © GB BE ; 
1700 ? #6;'' œ b| œ œ 2 
1710 7 n6:'" annänänian(innian(anis""; 
1720 7 RE CCE CRE ELLE" ; 
17370 RETURN 

1750 7 H6:'"'DDARAAAECABBBBBBBBBB[""; 
17600 ? #63: CAAE cs A6 BBA": : 
1776 ? 63° CE 8 2 (5 O8 E°'3 
LV7OR 2 BI PH [| b) (n12 
1790 ? #6;°:° FrhacGbbbtb) °°; 
1806 7 #6 CRDDE] Mix Or: 
1810 7 H6: (AAAS CAAAAAS °°: 
18290 7 6 m «@ (0 
1850 ? 6 (PH A3 COAMAAAAE": 
1840 7 #6 FAANPE EE] (b) "3 


1856 7? H6 
1860 7 H6:; 


KKOCLLLLIETOR CON CAS" * ; 











1870 RETURN 

1890 7 H6:'1NM0NNN11NNNNNANAIANNN" 
19060 7 Hn6:'° 1 Bb] CS 

1916 7 nH6:'' b] um æ 
1926 7? 3 ss BE = & 
1930 ? bo] (b] 4 & © 
1940 7 EE © a © © 6) 
1950 ? us mm HD 

1969 ? Œ GRLTET15 Lt 3 
1976 7 2 
1980 ? 3 
1990 7? "x À à DE 
2000 ? H6:'ALIIMILEELELLELILEIS"" : 
2910 RETURN 

2050 T7 H6:'"CAAAAAANAAAARAADDDAA""; 
2040 7 H6;'"" CANAAECTAAECARE Lo LUE 
2050 7? #6: CARE CE ca QUE 
2069 7? #6:!':' CE C LE : 
2070 ? H6:°: j de: 
2080 7? H6:;°° C1 52 1e 
2090 ? n6:°' MAS: QE 
2100 7 n6:°' MANN AS “3 
2110 7 H6:'° di) (ALLTAS (112 Ci 
2120 ? H6;'UATIMINNTIS (122 vez 
2130 ? H6:""CLLINLLLUIS kKkKKkK''}: 
2140 7 6, "CLLIMIINTINANNNAAA1ANAAS"" : 
2150 RETURN 

2170 ? H6:'"ADDDDDDTAAAAAAAADDDD""; 
2180 7 H6;"'E BAAAAARAE ire; 
2190 ? H6:" !s MAAAAARE '*; 








2200 7 & | [NMAAAAAE Œ°:: 
2219 7? bb] MAAARE @"*: 
22:90 7 bb, BAAAE D": 
22350 7 H6:'° [A3 MAAE °°: 
2240 7? H6:'° (A MAE (Au 3 
2250 7? H6:;'' 19 ME PFAARDEE 
2260 7 H6:;'° (S BÉLLLIT" ; 
2270 7? H6:'° (ASk k 3j 1 1 EME"; 
2280 7 146; '{LLLYLLLELILLLLETENT)"": 
2296 RETURN 

2310 FL=FL+1L:IF FL<HY THEN RETURN 
2320 FL-=0o 

2330 E=INT CRND COD)KSD)+L:IF E=1 THEN E=8 


B:PH=S:PY=9:PDSS:PE-1 


23540 IF E=2 THEN E=80:PH=S:PY=9:PD=S:P 
E=1 

2350 IF E=3 THEN E=79:PH#H=6:PY=9:PD=S:P 
E=6 

2366 IF E=4 THEN E=81:PH=10:PY=9:PD=18 
sPE=1 

23790 IF E=S THEN E=81:PH=12:PY=9:PD=18 
1PEZ=S 

23580 COLOR Et1690:PLOT PKH,PY:DRAMNTO PL, 
PE 


2390 FOR T=1i4 TO O0 STEP 
:TINEXNT T 
2409 LOCATE 
F2 THEN 340 
2419 SOUND 0,0,6,0:COLOR 32:PLOT PX,PY 
tDRANTO PD,PE 

2429 RETURN 

2440 GRAPHICS 18:POKE 559,46 

2450 POSITION 2,5:7 M6 ;''ICIENEMERENUTEM 
ETS 

2469 FOR T=0 TO 1609:POKE 
SINEXT T:POKE 712,0 

2479 POSITION 2,7:7? H6;'‘score :°° 

2486 FOR SCZ=SC TO SC+100 STEP 160:POSIT 
LION 9,7:7 H6:S0C 

2490 FOR T=14 TO O9 STEP —-1 

2500 SOUND 9,14-T, 14, T:NEXT T:NEXT SC 
2519 POSITION 2,5:7 H6:''GB4AMIhNMMEIL 2": : M 
is, DE So NS, "| ST en als Es 


1: SOUND 6,7T,2 


CH-482/8, CV-182/8,C:1IF C<> 


712,RNDCOD2 #25 


25296 IF MN=19 THEN MN=18 

2550 FOR T=0 TO 255 STEP 5 

2549 POKE 716,7T:SOUND 9,7T,14,14 

2559 NEXT T 

2560 SOUND 6,90,0,0 

25790 MU=MU-S:IF MU<19 THEN HU=19 

2569 GOSUB 5000:GOTO 110 

2520 REM 

2619 COLOR ASC C'‘El" 2 :PLOT 6,6:DRAMTO 1% 


>, BIPLOT 193,11: DRAMTO 6,11:PLOT 96,1:DRA 
NEFDULTS EL 

2620 PLOT O0,10:DRAMTO 19,10 

2670 POSITION D0,2:7 H6;: LGOS;:LG25;LGOS; 
LG25: LOGOS) LG2S: LOGOS; LG25; :HU=O 

2640 FOR X=0 TO 7:POKE 464+H#+START,255S 
:NEMT XX 

2650 FOR K=9 TO 7':POKE 464+KH+START,O0:N 
EXT HX:POKE 717,RNDCO)K25SS 

2669 IF STRIG(OI-O0 THEN MU=26:MN=7:NMm= 
1:2%C0-0: GOT0O 27216 


2670 HU=HUEL:IF MU=S56 AND FLAG=Z THEN 
27606 

26890 GOTO 2646 

26990 SOUND O0,90,0,0:SOUND 1,9,90,0 

2700 REM 

27219 7 H6;''N'': POSITION 9,0:POKE 712,2 
2739 SOUND 9,0,60,9:SOUND 1,9,6,6 


2740 7 H6;:LG2Z5: 
2750 7 H6:''CARAAAECECARAAAAARAECE""; 
2760 ? n6;'' CAE CARAAAARE QL 
2270 7 #6; CE CAAAAE LL 
27806 7 #6:'° CECE e 
2799 COLOR 188:PLOT 2,S5:DRAMTO 1+MN,S 
2809 POSITION 4,6:7 H6:SC 
2819 ? 16 ;''û] Us à La à) 
2826 7? n6:'"'C01  LMLLLI) CLIS" 
28356 7 46: ''STUIMLLLITT:) CXLT"* 
2840 7 #6: "COLLE LLTIHI MULTI)" ; 
2850 ? H6:LGOS; . 
28690 IF PEEK(CSI2792-=6 THEN 29?00 
2870 IF STRIG(COI-O THEN 2860 
2880 GOTO 110 
2899 REM MMM GAME OVER 
29090 GRAPHICS 
GAME OVERS 
2919 SOUND 9,90,90,0:SOUND 1,6,0,6 
2976 A=USR£IMOUE,0,PMB,2Z,9,9, 82 
2930 POSITION 5,3:7 H6;''score:'':5C 


Cr 


se he 


ve be 4e 


Lo 
18:POKE 559,46:7 H6;°'" 


2959 POSITION S5,6:? 46 ;'‘EJ2ETT)" 
2966 FOR HU=O TO 160:POKE 711, RND CO) #2 
SS:NEXT MU:MU=D:FLAG=-Z:GOSUB 5006 

29790 POKE 711,14:POKE 708,S0:POKE 716, 
S6:POKE 712,2 

2989 ? H6:''K'';: : POSITION 0,0:POKE 756,P 
EEK (C1062+1:G0T0 2616 

3669 RESTORE 3106:T=-1:NM=1 

3619 E=INTCRNDCO2#23+1:1IF E=1 THEN REA 
D X,Y 
36029 
3650 
v 
3040 
3656 
3120 
36060 
3676 
2 
50866, 
360°6 
3106 
53119 
53120 
s150 
5110 
3150 
3169 


READ X,Y:IF K=-1 THEN GOTO 3056 
HÇCTI=H:YCTI=V:ILIF E=2 THEN READ X, 


T=T+1:GOTO0O 5019 

E=INTCRND CO)2#S32+L1:RESTORE CE“10)2 + 
FOR T=1 TO NS 

READ H:E=TK2:PCE-12=HCTDI:PCED=YCT 


SCTI=H:NEXT T 

RETURN :GOTO 1190 

DATA 19,5,15,6,10,1,1 
DATA 13,5,4,3,16,5S,5S, 
DATA 11,6,18,7,-1,0, — 
DATA S,1,4,2,7,5,6 
DATA 6,2,5S,1,3,4,7 
DATA 3,5,4%4,1,2,7:6 
DATA 4,3,5,7,6,1,2 
3179 DATA 6,7,2,5S,3,1,4 
3180 DIM POSC82,P15(8)2 ,P25$C82 ,ASC22 ,BU 
GES2,25(8)2 , PMMOUS (1002 ,X CMNBD , Y CNBD ,P CM 
B#23 ,SCNB)D ,D1S(83 ,D25€(82 ,LGOS (20) 
31990 DIM LG25(C20) 

3200 GOSUB 3330 :RESTORE 3756:POKE 
126 

3210 LGOS="! 
SLA EEE 

32206 MOUVE=ADR CPMMOUSDI:FOR X=1 TO 100:R 
EAD N:PMMOUS CHI =CHRS CND:NEXT X 

32306 FOR I=1 TO 8:READ N:PO$CI2=CHRS CN 
>2:NEXT I 
53246 FOR ZI 
D:NEXT I 
53256 FOR ZI 
D:NEXT ZI 


eau 

,… 

Cho 
.. 


712, 





Il 


1 TO 8:READ N:P1SC1I2=CHRS CN 


1 TO 8:READ N:P2SCI13=CHRS CN 


3260 FOR I=1 TO 8:READ N:Z5CII=CHRS CND 
:=NEXT TI 
3279 FOR I=1 TO 8:READ N:D1SCL32=-CHRS CN 


2:NEXT I 
3286 FOR 
> :MEKXT TI 

32996 PMBASE=INTCCPEEKC145)#+35)/423#%4:POK 

E 54279, PMBASE : PMB=PMBASE“256 : PMD=ADR € 
PO$I:POKE 55277 ,3 

3366 POKE 7604,62:POKE 765,46 

3319 PMC=ADRCP1959 : PME=ADR (P2$59 : Z=ADRCZ 
$S2:D1=ADR CD15)9 : DZ=ADR£CD25$)2 

S526 GOTO 1606 

33:39 POKE 106,PEEKC106) -5:START=(CPEEKC 
166)2+12#2S6:POKE 756, START/256:POKE 75 
2,4 

3349 RESTORE 4#4000:DIM HFRSCS82 :FOR Y=1 
TO SS:READ Z:HFRSCY,Y2=CHRS CZD:MNENT Y 
S3S50 Z=USR CADR CHFRSI2 :RESTORE S5599:X4=2 
S2-8:READ Z 

33606 IF Z=-1 THEN RESTORE :RETURN 

33706 FOR Y=9 TO 7:POKE KH#+Y#+START,Z:REA 
D Z:NEXT Y:H=AHt+S 

35890 GOTO 55:66 

3399 DATA 9,192,118,65,112,172,0,6 
3400 DATA 9,0,0,0,0,0,255,255S 

54190 DATA 6,0,199,207,205,207,287,2387 
3420 DATA 6,6,59,187,191,1®1,1835,183 
3439 DATA 9,9,120,96,112,76,127,127 
34490 DATA 255,255,255,255,255,25S5,255, 
255 

34590 DATA 
6 

3469 DATA 
53479 DATA 
144 

3489 DATA 255,246,244,244,112,6890,64,6A 
3499 DATA 1,7,23,25,55,127,127,255S 
3509 DATA _164,173,255,255,255S,255S,255S, 
255 

3519 DATA 128,13536,168,232,248,259,250, 


255 


Z=1 TO 8:READ MN:D25CI32=-CHRS CN 


255,17,255,136,25S,17,255S,1S 


255,255,55,21,21,5S,5S,1 
255,255,255,247,245,181,161, 





23 


24 


5520 
48% 
sE54+0 
550 
sSs68 
3579 
5 
356 0 
SSsTe 
3609 
3610 
n RS] 
360760 LATA 255,75,255,7S,258S,73,25%,25S 
650 DATA 2,6,6,31,22,27,18,S6 

S640 DATA 56,66,130,146,150,68, 56, 56 
F66O0 LATA 64,96,96,248, 104, 194,72, 7% 
5660 DLATA 16,74,84,157, 196,146, 84, 40 
GPO DATA 84,76,1r70,895,178,41,58,29 


DATA 199,199,46,50,6027,129,251,19® 
DATA 192, 226,113,58,9,21,67,63S 
DATA 56,56,16,56, 146, 186,214,254 
DATA S,T1L,1AZ,17T,144,166,194,2527 
DATA 24,24,74,24,60,126,126,107 
DATA 69,60,299,2195,255,255, 255,25 


DATA 19524,64,112,16,28,4,7,1 

LATA 24,48,24,148,74,48%,2A14,48 
DATA S,2,14,8,56,32,27A4,128 

LATA 255,146,2SS,146,2S5,146,15%, 


F6H0 DATA 0,69, 56,255, 255,255,206, 0 
560 DATA 6,0,0,6,8,0,2755, 255 

3709 DATA 127,255,192,204,127,5,299,25S 
+ 

S7LH DATA 6,11%,12%,107,121,117,96,976 
372 DATA D,4148,49,240,224,192,192, 192 
37590 DATA 262,254,198,254,292,192,192, 
LETE 

3740 DATA -1 

3750 DATA 216,104, 104,1904,1S8T,215, 104, 
24,195, 2, Pete 206,104,108, 205, 104,183, 2 


O4,104,15%,208,104, 104, LISE, 206 

3760 DATA 104,104,153, 290%, 104,104 ,2A4,1 

RER A EE + Qi ob 
«LUS ,128,135,205,165,206, 105 

s. 170 LATA 0,135, 206,202,208,248,160,0, 

162,0, ,196,209,144,19,196,7207,176,15, LS 

L,IAD,ATÉ, 166,177, 209,164 . 

#7H0 DATA 212,145,205,232,169,0,Z240, +, 

16%,0,145,205,2:00,192,1268,206,2274,16G6, 

2Z13,165,2068,157,0,206, 36 

740 DATA 9,197, 116,6%3,112,192,060,68 

S600 DATA 9,T1,110,2352,14,5,0,0 

ÉSE1LO DATA 24,24,24,14,6B,176,126, 10% 

Ferro DATA 0,60,0,060,0,0,0,9 

F830 DATA 6,192, ,118,57,68, 06,9, 0 

TEA4O LATA 0,0,20,55,112,1%7,0,6 

40006 DAT 104,169 ,0,183,2085,1355,20%,16 

9,224,155,206,165,106,24,105,1,1535,204 

160,9,177,205,145,2105,2:166,208 

AGO DATA 249,270 ,2104,25%0,206,165, 206, 

261,7228,208,28#7,96 





1 Bi GARE, ÉSUAd, REG, 2AGT, SA, 260, 69 
H,8447, ALL, LUS, LAS 

106 Pres SLI, 2608, ALOG, 20H65, LAZS, HS, SE 
D ed, LOUE , AU A 4 Er 267 à A A End À 

250 DATA LHTG ATP GS, LOL, SAP, AUD, DEEE , À 
#62, 16H82, 962, 14, À° 
HO MT LA , LP HE, ASS AS à LUS à 28 48 6 7 9 MER 
26h, 260,260 ,1777, 12:98 

SO DATA HIT, ATRHE,1TYE, 2ÉS6G, LOL, SEAT, 
964, H09VE,LDLG, 26592, AOL 












LOOY REM ### LS 2 nn. 
Lit REÉM MIMEUR * 
12 REM % Le 
LSO REM * POKEY » 1967 * 
AMOR PA 0é-E-DE-2E- Je DEA D ME nt 
150 REM 


169 GOTO 1241468 


170 SOUND NE ,NIO,N1LO,NOG:FOR TENL TO NZ 
MENT T'SOUND NZ,ME,MO, NO: AA=ANTMNA:ZIE 


Ah) SO THEM AATINO:POP :GOT0 3006 


160 IF VMS THEN POKE MLO+MS,NE: AA =MNE 
190 POKE TT,NOD:RETUMN 

200 LF MAM=MS THEN COLOR MNSZ:PLOT 17,N 
2 

219 IF MAMZML THEM COLOR NIZ:PLOT 1%, 
Eh 

220 RETLURM 

2ESÙ LOCATE H,TY-NL,AMA:LF KHHEHILGI THEN € 


Gen PATA 2606, 2006, 260, 1766, 1968, 1951, 1% 
SE, LIGA, LGLE LOUE, LS LEE 

FRE DATA 255,569, 28706, 2584 
2364 ,2GEI2, 2516, S8089%,25367% 
Sr DATA 512, 2262, DAS, 4269, ALES, LATD, 
2H, 121, 871, ASS, 20747 

DS DATA SGÉSAL, 16546, LdIS, LOGSE, LHEG, L397 
2 LESFT, 250, 24, LANG, SNS 

LOG DATE 2444, FOBL, GAL, LSLB, 692,267 
H,85519,527,1208,2516, 25015 

1150 DATA 3590,1986, SATA, 2ALL,2585, 242 
De ds, 2e y 24 AS , RMS ES , 2 6 EN L Er 

1260 DATÉE LAS, ZLGD, LE, 26H16, 1009, 625 
,364,4890, 1564, 1204, 21969 

1570 DATE 1204, 12164, 1204, 1416, 162% , 1 dd 
7, 2814,935, 912, 5146, 14607 

1486 DAT 2514,2896, 2770, 2540, 2504, 2227 
SL, 2IAG, 2HAG, SO, S190,25179 

1588 DATA ALB6,SL2,4690, 1592,2174,2756 
12468, 2S606,2368,2H62,2SF746 

1698 DATA 25686, 1766, AIS, 42H56, SA, 16853 
16895, 21#9,1926, 2802, 231%2 

18600 DATA 2366,4836,16592,S090,2516, 348 
S,4269,H12,489H,1592,2r7650 

1918 DATA 1786,2174,19800,212D,2409,253 
SH: HFL60, SON, EHA4ËG, 429,288 1 

2010 DA SZ, 168L,1661,1268, 1117, 104 
16520, 212, 2554,2980,16329 

2120 DATA 3246, IE, 4598, SLE, LÉGL, 1671 
1798, 1956, 1925, 16896, 2247S 

2ESO DATA L0H67,2158,2447,24609, 2906, 4A%S 
6,512,19$#6,25S, SY2L, 21997 

LEA DAVA 22764, 2291L,25 F7, 2AUE, LIGA, 26S 
LT, 2616, SOUS, SL, LAS, 2LFS 

RATE DATE APLE, SILOG, 1609, 2992,1266, 207 
Le HD, AL, LE, AG , À SITE ZE 

2558 DATA 455, 749, 1764, L1HD,2600,S087, 1 
F42,3696,2562, F600,20805 

2660 DATA S960,2305,549,1567,26m, 1936, 
1557, 535; 1694, 1416, 146891 

270 DATA 1266, 1154, 2OSL,1262, 2546, 2196 
6,#610,A4254,564, 1500, 2497% 

248 DATA LSEL, 49L, 2106, 747, 1557, 1945 
19685, S2AL, ALDA, 2669, 22516 

2960 DATA SL7d, 135651, 2508, 1925,2181,9726 
16156, 826, 2067, 89D,17r79% 

SB96 DATA 1B061,1675,1576,1218, 942, 942, 
PAZ, PAL, PAR, 554, LH DE 2 

FL90 DATA G62,2206,6075, 4062,2516, 2517 
1225418, 24786,29505, 2506,26665 

F8 DA SEA, 183457, 1958656, 490, 4412, 4496 
1 LHELI LIVES, S2OY, SAN, 2GETA 

S490 DATE LA06, 1228, 1060, LGLN, 154%, 16 
B,1762,159S5, 1868, L'rO6, 161604 

EA4YG DATA 1498, 1866, 1887, 1720, 1966,166 
6,17905,1585,1762,1597, 166121 

+690 DATA LATE, L1T9S,16785,1720,1292,161 
A,1GLT,LGAS, 1568, L549,156958 

690 DATA 1222,17/59, L641, LESIE, LEE, 466 
49F8, SB1E, AP7VY, APAET, 28038 

F798 DATA 1485, na dar 1066, 1286, 152 
L:5009,26569,15558 


res, 2 SE, 


OLOR NSZ2:PLOT H,Y%*%-N1i 
249 LOCATE 4,Y,HH:IF 
R NET':PLOT K4,Y 

259 LOCATE KH,VFNL,MM:LF HAH=NIGL THEN C 
OLOR NS2:PLOT X,Y+N1L 

260 LOCATE KML, Y,MMH:ILIF HH=MN1IG61L THEN C 
OLOR NSZ':PLOT H-N1,7Y 

279 LOCAVE KHtM1L,Y,HH:IF HH=MNIGI THEN C 
OLOR MIZ':PFLOT H+MN1L,Y 

269 RETURM 


RH=MN161 THEN COLO 


299 SOUND MZ,14,N190,M8:SCORE=SCORE+N16 
MHNLO! GTEGTINL: GGEMNO: SOUND NZ,NO.NO, NO : 
RETURN 


369 GOSUE L1LO: MAN=MANM-MI:GOSUB 256:G0 





SUB 200:GG=-N1:1F MAN THEM 1159 
S19 GCGOTO 550 

SI0 H=MNS:Y=N4: FOR T=MI TO 5S0:SOLIND NL, 
12,12,N1O:NENT T:SOUND NL,NO,NOG,NO 

SA49O S=STICKEINOD :H1=H:YL=T 

350 LF SKI15 THEN SOUND NO,54,NS,N1 
369 DH=CS=NT7I -CS=NLOENILD : DY=CSENLO+NITD 
— LS=N1O0+N42 

376 FOR T=N1 TO DIF:NEXT T 

360 H=HIDH:V=VYH DT 

390 IF H<NIL OR X> CNLO+MNSD THEN H=H1i 

400 IF Y<MNA OR V2? THEN YV=vV1 

410 SOUND NO,NO,NO,MN@ 
429 LOCATE H,Y,ZZ:1F 
290 

459 IF ZZ=NA THEN H=H1L:Y=Y1 
S4,NG6G,NG6G: FOR T=N1L TO MNLODO“NZ 
ND N1,NO,NO,NE 

449 IF Z£Z=M168 THEN SOUND M1,12,N8,N&: 
FOR T=N1L TO 15O0:MEHT T:SOUND MN1L,N9,NO, 
NO: GOTO 360 

456 IF ZZ-N1IGZ2 THEN 360 

466 COLOR NIGL:PLOT H,Y 

470 IF SC>15 THEN COLOR NS2:PLOT 41,71 
480 IF PEEK(MID+M9I3)> AIR THEN GOSUB 179 
490 IF GT>=GOLD-NL AND Y<NS THEN SCR=S 
CRENL:GG=N1L: ALR=ALR-MIL:UVUENS:MEN4:GT=NO 
#LEVELZLEVEL#+N1L:GOTO 7309 

S00 IF ALR£NZ THEN ALR=NZ 

S19 IF GG=NL THEN SA4O:REM GUARD NOT ON 
BOARD 


NO7Y 


ZZ=NSS THEN GOSUE 


SOUND M1,2 
NEXT T:SOLu 


S20 VIL=U: M1i=M 

SSO DIRH=SGM CH -UI : DIRYZSGN CT - #2 

540 V=UHDIRKH: M=MH+DIRY 

S50 IF V>NSENZ OR VUCNZ THEN VEUL 

S60 LOCATE V,M,MM:IF MMENLSTS OR MMZNA 


OR MM=N16S8 OR MM=ZNSS THEN VY=UL:M=Hi 
S70 IF MM=NIGL THEN 300 

580 COLOR N162:PLOT Y,M 

S90 IF V£LPUL OR MC:M1 THEN COLOR 32:PL 
OT VL,Hi 

600 GOTO 3410 

610 NL=L: NZEZINISETS INA A4: MNSES I: NG=GINT = 
INSE=S:NS=S:N1LO=10: NO: SCORE=NO:GT:MNO 
LEVEL=NO:GG=N1:GAMEZ=NI 

6290 N161=-16L:N162=162:NSS=SS:N1SS=1T3: 
NSG=SB:MN1IGH=L16S: SCR=ENL: MANENTS: ALR=N1O ; 
VENS:M=NA4A:NSZ=S2? 

6:60 POKE 106,PEEK(1069 -N2Z:GRAPHICS M1L+ 
CNS+M6I2 :A=PEEKC1062“256 : SET=PEEK(CLO6)D : 
POKE 756,SET 

646 FOR T=NOG TO N7:POKE A+T,MO:MNENT T: 
REM SPACE 

650 RESTORE 670 
669 FOR T=MNS TO NSWN/INS:READ CHAR:PFOK 
E ATT,CHAR:NEXT T:REM CHARACTERS 

679 DATA 24,690,24,126,90,60,36,1082,2171 
:165,231,24,126,165,129,255,126,195,19 
2:191,;177,:189,195,126 

680 DATA 24,60,54,126,127,251,159,2SS, 
2S5,247,255,191,2S1,255,223,255,0,0,2 
:24,0,0,0,06 

6996 DATA 66,119,255,191,251,255,119,60 
:165,60,66,15:0,79,40,36,46 

766 RESTORE 676 

759 FOR M=NL T0 N160:BH=RMND CNOIÆCNIO+NED 
I C=RND CNOIENI: COLOR NSS8:PLOT IMT CHI ,IN 
TLCD:NEMT M 

7590 COLOR N133 

769 FOR M=NS TO NLOMM2Z+ME:PLOT NO,M:DR 
AUTO NIOI*MNS, M:MEMHY M 

786 GOSUE 19000:POKE MNID+-NS,NE 

790 FOR ME=MIL TO ROCKS:B=RND CNO3EÇCMLODÆN 
232:C=RMND CNOI M CMLOMMNEHMID:LF CKMG TMEN 
C=NG 

800 COLOR NA4:PLOT INT£CBD ,LMTIC2I:MEMT M 
8290 FOR MEML TO GAS :BTRMD CMOD 6 CMLOMMZS 
SC=RND (MOI Æ CHLODEMNT INT :IF C<NGS THEN C= 
NG 
85:50 
m 
850 





COLOR N168:PLOT INT CB , IMY CCI: NET 


COLOR 3%:PLOT, MiO04+N7, MZ 

870 FOR M=N1 Y0 GOLD 

889 B=RND CHOD # CN1OMMZI : LERND CNOIKCMNLO% 
NZD :LOCATE ZIMT CBI ,INT CCD ,HM:XF HAX=NSS 
THEN 880 

890 IF CKN7 THEN 6689 

300 IF BEN1 ON B>18 THEN 880 

910 COLOR NSS:PLOT IMTCBD ,IMT CCI :MEHT 
M 

350 IF NOT GAME 


THEN 969 


940- GAME=NO - - 

950 COLOR NIGL:PLOT 19,M1:PLOT 19,MNE 
969 RESTORE 996 

979 READ B,C:LIF B=-999 THEN 330 

980 COLOR N#:PLOT B,C:GO0OTO 9370 

PS0 DATA 1,4,2,3/5,404,4,5,4.6,4,7.,4.5 
4,10 ,4,11,4 So4,:16,4, 


DS “ 
412,4,13,4,14,4,1 
17,4,18,4, 9299 
1000 REM 








1019 IF SCR=NL THEN GOLD=MS:GAS=NS:ROC 
KS=EN2?:DIF-NS 
1026 IF SCRZ=M?2 THEN GOLD=NT:GASENT:ROC 
KS=NA4:DIF=NS 
1030 IF SCR=NS THEN GOLD=EN9:GAS=NS:ROC 


KS=NG:DIF=-N7 

1040 IF SCR=MNA THEN GOLDTNLO+MNI:'GASENY 
1 ROCKS=NS : LIF-=-MS 

1056 IF SCRENS THEN GOLCENIDINTS: GASEMS 
FROCKS=NG: DIF-NS 

10660 IF SCRTNG THEN GOLDL=-NLOINI: GAS ZMI 
O+ML:ROCKSEINS: DIF =MA 

18790 IF SCRENT THEN GOLDE-NIiDEME:GA 
1ROCKS=NZ: DIF -MTS 

10689 IF SCR=NS THEN GOLLZMS:GAS MIO NS 
1ROCKS=NT:DIF=-NEZ 

1090 IF SCRI=MNS TMEN GOLDEMNIOINIS:GASTN 
F'ROCKS=NS:DLF=NIL 
1109 RETURN 

1119 RESTORE 1140 
1129 READ A:IF A=256 
NO,NO:RETURN 

1179 SOUND MI,A, N1LO,NG:FOR 
:NEXT T:CGOTO 1129 

1140 DATA 243,245 ,: T,245,2485,245, 2590, 
230,250,250,743,245,24T,24%,245,2756 





THEM SOUNE NIS,.M@, 


T=NIL TO N10 





11590 FOR T=NYS TO 2S:PLOT NOG,T:DRAMTO 1 
9,T:NENT T:POKE 756,22 

1160 POSITION NS ,MNS:7 H6;''GAME OQUER!'" 
1179 POSITION N1,NS:7 46; 





QU SL 
1180 POSITION MEZ,NS8:7 H6;'niveau termi 
ne :°: 


1190 POSITION NB,NS:7 6 EVEL 





“sn 


12600 POSITION NS,12:7 6 presser] tir 
.. 
12190 POSITION NS,14:7 H6;''POUR LA11|A4:] 
mr: 
1226 2IF NOT STRIGCHO)D THEN POKE 1606,/P 


EEK C106)2 tNZ2:GOTO 616 


12:60 GOTO 1226 

1240 GRAPHICS +16: SETCOLOR 4,9,2:SETC 
OLOR 1,15,8 

1250 POSITION 6,3%3:7 H6;'° MIMEUR el! 
1270 POSITION 4,7:7 H6G:''POKEY , 19587 
On 

1260 FOR Zi 10 SO: A=PEEKC708)2 

1250 FOKE 708,PEEKC7113 :FOR TEL TO SIN 


EXT T:POKE 
NEHT T:POKE 
1500 FOR T=1 
XT Z:G010 610 


AL, ,PEEK71097:FOR T21: TO) 5: 
410,PEEKC799)2 


TO S:NENT T:POKE 7O%,A1NE 


109 DATA 1H016,1129,866, 1189,1016,2b6,%5 
44,6369, 2055, 1165, 156218 

200 DAT 2242, 22350, S1R, SSAË, SLOA, FA, 
3448, 3544,512,50686,27960 

3096 DATA 4297, 495, 4L2TL,AAZS, LS, ZE 6%, 
LAGE, DIS, LIL, LOS, 20915 

419 DATA 1061,2611,%404,5204,1161,Le15 
1 PATL,2119,6829,185%,2896 7/4 

S29 DATA 2566,624,1009, 1249, 1776, dd da, 
11H#4,1272,2695,496,1H092L 

619 DATA S915,H811,5096, 2044,747%, 448, 
4A6GH5S, 4149, SOÎS, 737, 366I6G 

738 Dar S177,644, 3447, 152%, 400%, LEA, 
AANT, 2566, 1455 ,1049,26953 

646 DATA 4867, 962, 1LALES, 2501, A2S , AE 9. À 
9016, 747%2,1566, 165%4, 17/5309 

9390 DATA A2H59,260, SDHAZ2, 3017,302%8, S2K9, 
S259,S3A44G, 3276, S288,29941 

1090 DATA S305,512, 776, 7898, 1147, TIALD, 
35656, 1964,2516,2H607, 24748 

1190 DATA 16651,33577,23258, S22r,542, 2781 
1771,1962,1506,66080,259S7 

1508 DATA 2945,2945 





25 


26 


NUMERMMION 


4 POKE 16, 6E4#:POKE 57:774,64:DIM REPS CT) 
:DIM REPONSES CA49 : DIM O$C293 : DIM CHCLS CZ 
2:DIM ASC42 

5 DIM TSC1L832FTS=7't, "1 TS CLSD =", 
$S:DIM VSCLI:VS='"", 1": DIM NS C4) 
6 DIM CCLNT: DIM NCBJ:DIM PSCTSD :PS=Ir—r 
1PSCI82='"=":PSCLI=PS:DIM ACBI : DIM AACS 
2 

7 REM  M-R-M-M-Mé-DMé-DMé-DnéMEDME-EJOEDu-DRE- MED DUDuDuDEDE-DEEDEDUE 

9 7? CHR$SC125) : SETCOLOR L1,0,6:SETCOLOR 

2,11,16: SETCOLOR 4,12,S:POKE 752, 1 

15 DIM L$C22)3:LET US$ C13=''#':LET US$ C22)9 


=''#H'': LET US C23=US 
29 FOR Y=4 TO S8:POSITION 9,Y:7?7 US:NEXT 


6 

25 POSITION 16,2:7 
36 POSITION 15,6:7 
46 FOR T=1 TO 3 

41 LET KH=10:LET Y=11+7T 

56 FOR C=96 ro 9° 

69 POSITION X,Y:7 C:SOUND 9,121-C5KC0CD2, 
186,10:H=H+1:FOR M=9O TO 2S:NENT M:NEXT 
Les 

76 FOR C=®% TO 9 STEP -1L:POSITION K,Y:7 
C:SOUND 6,90+CS#C),190,10 

71 FOR M=O6 TO 2S:NENT M:H=H#+L:NEMT C 
ET Y=Y+L:NENT T:SOUND 96,0,60,9 

680 OPEN H1,4,Q,'°K:'° 
90 POSITION 19,18:7 
95 GET #1,kK 

99 IF K<>62 THEN 99 
100 IF K=62 THEN ? CHRS$S(C125)9 
101 CLOSE #1 

107 REM FMHHPAGE 
196 CLOSE #1 

110 SETCOLOR 1,0,15:SETCOLOR 2,7,0:SET 
COLOR 4,4,12:POKE 756,204 


“3ITSC232=T 


0. GT 


Fr 


‘"2'':CHRS C2539 


PE SE Su. 5.5.5.5.5 1.5.1 


115 ? CHR$C125)9 

129 POSITION 8,1:7 “CHOISIS SELON TA F 
ORCE": 

130 POSITION 6,3:7 ‘‘“ÆN © # 19 G 
e 1 560": 

140 POSITION 6,5:7 ‘‘Æ © ! 20 rd 
6e & 70": 

156 POSITION 6,7:7 ‘Ki © 8 30 El 
6 & so:: 

169 POSITION 6,9:7 ‘#] ON 40 E 
6 LE S0o:: 

176 POSITION 6,11:7 ‘© 6 4 so [2] 

Œ © # 166": 

180 POSITION 6,15:7 ‘'EEN © À 506 [1] 

& © #5 s0oo": 

1990 POSITION 6,17:7 ‘‘Æ#j © £ 600 2] 

! © # 1000: 

209 POSITION 16,290:7 “Ton choix:"'!t 

205 POSITION 27,20:IMNPUT CHOIX 

210 IF CHOIH=6 OR CHOIH>14 THEN 206 
229 FOR Y=9 TO SO9:NEXT Y:OPEN H1,4,9, 
TEL 

239 POSITION 19,22:7 ‘‘'':CHRS C253) : GET 
H1,Kk 


2490 IF K<>62 THEN 2270:IF K=62 THEN 7 C 
HR$SC125) : CLOSE #1 

2596 RESTORE 270 

2696 FOR I=1 TO 14:READ J:CCII=J:MEMT ZI 
279 DATA 19,290,30,40,50,60,79,80,90,10 
68,3:300,600,800,1000 

2899 LET Z=CCCHOLX) 

2990 REM #4 PAGE D hé pE- REED 

309 GRAPHICS L:SETCOLOR 4,8,16:SETCOLO 
R 2,8,10:SETCOLOR 1,19,4:POKE 16,64:P0 
KE S35774,64 » 

319 POSITION 5,1:7 H6:;''OPERATIONS'': POS 


ITION 6,3:7 H6:''sur 1es ‘‘:POSITION 7,5 
1? 46: ' TITI TE)": 

329 POSITION 3,11:7 H6:;"''1 ciassement 
s" 

330 POSITION 53,15:7 H6:"''2 tableaux‘ 
340 POSITION 5,19:7 H6:''x comptages‘: 
350 ? ,.,,,,:'"TON CHOIXT'",, ,: INPUT 0$S 
369 K=ASCCOSI:IF K>S1 THEN 3:50 


365 
370 


O=VALCOS) 

FOR AT=9 TO 25S:NENT AT 

56890 REM MAÆRMMEMIMNTERL LD EE 26-26-6-H6-6-26-htp-DE DE 

599 GRAPHICS 2T3:POKE 16,64:POKE 53774, 
64:A=158:SETCOLOR 4,6,12 

409 FOR V=O TO 93 STEP 3S:FOR U=6 TO 2: 
COLOR U#+1:PLOT O,U+U: DRAMTO À,V+L:SOLUN 
D 1,40+0,10,10:NEXT L''MEXT V 

49S SOUND 1,0,0,0 
419 COLOR O0:G0SUB 
B 2040 

4290 LET AZ=1S:LET B=20:LET C=3O0:LET D=6 
6 

450 GOSUB 2090 


2010:G0OSUB 2070:G0SL 


449 LET AZ=SS:LET B=SO0:LEY C=60:LET DC=4 
68:GO0OSUB 72100 

459 LET AZSS:LET B=65:G0SUB 2110 

469 LET AZ?7S:LET B=8S:LET E-9%0:GO0SU0B Z 
120 

4790 LET A=9S:LET B=110:GO0OSUB 2140 

4890 LET A=115:LET B=-1:0:GO0SUB 2150 

499 LET A=135:LET B=150:LET E=140:GOS10 
B 2162 

491 FOR AT=590 TO 75:SOUND L,AT-45,10, 1 
6 

492 FOR WNT=75 TO S0:SOLUND 1,MT-45,10,1 
6 

493 A=PEEK(C711) 


494 POKE 711,PEEKC710) 





495 POKE 710,PEEKC709) 

496 POKE 709, PEEKC708) 

497 POKE 798,A 

498 NEKT MT:NEXT AT:SOUND 1,9,9,0 

S06 ON O0 GOTO 519,766,920 

510 REM WMC LAS SEMEN T SK MEME 
S15 GRAPHICS 2 

S16 POSITION 4,1:7 H6:''(HMEELITTRET PO 
SITION 5,5:7 H6:'"{M"": POSITION 16,7:7 #6 
RL 2 QU 

S29 POSITION 1,5:7 46; "SM: 2 à NN ON “1 :; 
GA": 

S25 POSITION 4,7:7 #6; "21 

S59 POSITION 1,%:7 66: "M1: T1.) RE 2e 
LLTE 

SSS 7 ‘Yotre ChDix:'': INPUT CHOCLSIK=ASC 
CCHOCL 952 

SS6 IF K>59 THEN GOTO 535%5:CHCL=UAL COCHE 
LS) 

SS57 ON CHOCL GOTO 540,630 

SAQ REM MMM é PETITE 4 CR M LEE 

S45 LET 60-09 

S55 GOoSUB 27:00 

566 LET G0=G0+1 

579 GRAPHICS O:POKE 16,64:POKE G61I774,6 





4: SETCOLOR 2,9,16:SETCOLOR 1,127 
OLOR 4,11,6:7 CHRSC125) 


S793- POSETION- 122, 2:57 EXERCICE nn: 60 — 


S690 POSITION 2,4:FOR I=1 TO 8 
O2 +? NET" AS:NENT ZI 

S63 LET =? 

S64 FOR H=1 TO 83 


585 POSITION M,6:INPUT AS:K=ASC CAS) 






586 IF K)SS8S THEN 585 

S67 AZUAL CASI : ACHI=A: M=HMErS 

S88 NET %X 

596 GCGOSUB 2180:GO0OSUB 2259 

595 POSITION 5,68:7 ‘#Ù CORRECTIOM? 
3 SOLUTION?! 

S9S5 POSITION 1%,10:INPUT REPONSE 
S96 IF REPONSEZ=Z THEN GOrTO 619 

600 IF REPONSE=1 THEN =? 

695 FOR Hz1 TO 8 

606 PFOSILTION M,12: LNPUT AS:K=ASCCASI 
607 IF K2S58 THEN 606 

608 AVAL CASI AN CAI TA MEMEN MENT K 
619 GOSUB 27180 

620 GOSuB 2190 





621 
625 
638 
6355 
640 


ON REP GOT0O 555,650,166,10979 

ENC 

RENM KAÆé+GRANDEEREPE TI T PEER RE RE 

LET GO0=9 

GOSUE 25:06 

659 LET GO=60#+1 

655 GRAPHICS 90: SETCOLOR 2,90,16:SETCOLO 
R 1,12,8:SETCOLOR 4,11,6:7 CHRSC1259 


669 POSITION 12,1:7 ‘Exercice n. ‘‘:G0 
665 POSITION £2,3:FOR I=1 TO 8 
GPOUNTNEES 2" MSSNENT Z 

686 LET H=Z 

685 FOR K=1 TO 8 

690 POSITION HM,6:IMPUT A:ACHI-A:MH=M#+A4: 
NEXT % 


ZI140:GO0OSUB 2250 
"‘"ÉA CORRECTION? 


769 GOSUS 
710 POSITION 5,8:7 


Éi SOLUTIONT"" 
715 POSITION 19%,10:INPUT REPONSE 


726 IF REPONSE=Z TMEN GOTO 740 

2725 IF REPONSE=1 THEN H=2? 

739 FOR KH=i TO 8 

755 PFOSITION M,12: INPUT A: AA CHI=A: M=M+ 
A:NENT # 








749 GOSUB 2540 

745 GOSUS 2170 

759 ON REP GOT0O 640,555,106,109%0 

760 HEM MEME T À 65 LE A LE MEME MEME 

765 GRAPHICS 2L:'POSLIYTION 6,1:7 H6:''tabl 
eaux 't: POSITION 60,7:7 H6:''nombre nombre 
nombre‘! 

766 POSITION 60,6:7 #6;'"° -1+1 -5+5 = 
190+16'": POSITION 2,8:7 H6:''S | 

[1 Gu 

PQ CUS jar CYOTRE CHOIH:!!',:, : IHPUT CH 
775 LET GO-09 

760 RER  6-e-pé-ht--pé--hé- bé De EE CIO R 26-26 
785 7 CHR$SK125) : GRAPHICS 6O:SETCOLOR 2, 
15,12:SETCOLOR 1,15,2:SETCOLOR 4,7.,5:P 
OKE' TTaiT 

787 POKE 16,64:POKE 53774,64 

606 LET G0=GO#+1 

801 POSITION 13,2:7 ‘Exercice n.'°;:60 
505 FOR HA=L TD L9 STEP 6 

6806 FOR "#4 TO 15 

807; POSITION K,Y7:7 VS 

8608 NET YT:NENXT H 

680% FOR ?» 4 TO 19 STEP 28 

819 FOR Yi TD 153 

611 POSITION X,Y%7:7 VS 

G22 MENT VINENT 

GLS FOR MH=2D TO 2 STEP S 

Sia FOR Y=T T0 = 

815 POSITION ,7:7 US 

816 MEMTY Y'NEMT # 

817 FOR H=ZSS TO 368 STEP 5 

818 FOR Y=z4# TO 15 

SLT POSITION N,T:7 VS 

20 MENT Y'MNEXT %# 


22 LET KHE=L:LET Y=S:0CO0SUS 
827 FOR Y=z4 TO 15 


25:50 





GZA LET Yr6:G0OSUBS 25:59 
82S LET Y=:15:G05U0B 2350 
626 POSITION 38, 337 !'"," 
850 POSITION #,168 LR 
840 POSITION £,5:7? ‘‘AUARANT'':POSLTION 14 
°FLIT APRES": POSITION 22,517 MAU, POS 


ITION 55,5:7 ‘‘AaP.!'" 
6845 REM DT LR 
850 GOSUB 25:98 

S2 LET K=1 
2 FOR Y=7 TO 141 

POSITION 9,Y:7 NEHI :H=AHYA 
65% NEXT Y:LET M=6:LET FLET 
860 GOSUE 2415:POSLXTION 2,17:7 








SS=14 
"ERREUR 


SI: POSITION 9,16:7 "POSITION 9,18: 
pong 

865 GOSUB 2360 

870 POSITION 21,17:7 "ICORREC. #350 
Lee 

675 POSITION 20,19: LNPUT REPONSE:POSIT 


CONS 2837 sis 

850 ON REPONSE 6010 890,989 

SAV LET. S=Z2L:LET 55-235 

595 GCGOSUE ZT415 

00 GOSUB 2530 

919 GOSUE 2506 

911 ON REP GOTO 785,760,106,1090 

DLLD REM MEMBRE C OMIP T A GES BE-RE-E-ME-PE- PEME PME DD E 
925 GRAPHICS 2 


926 POSITION 6,60:7 H6:''AITRETE;"" : POST 






TION 4,4:7 H6;''de 2 en 2'*: POSITION 
4,6:7 H6;''de Li en S'': POSITION 4,6:7 
#6 ;''de 3 en 

227 ? ,ys:'" "Taille du saut:°°,,, : INPUT C 
H 

23:0 GRAPHICS O:SETCOLOR 2,14,6:SETCOLO 
R 1,14,14:SETCOLOR 4,7,12 

9349 LET G0-9 

9AS REM PRET R AU A LL MERE DEEE DEMO 


956 7 ‘‘K‘°:GO=GO+L:POSITION 13,2:7 ‘‘Exe 
rcice n.'':G0 
966 POSITION 4,4:7 "COMPTE DE ">: CH:POS 


ITION 17,4:7 
DE à". 
979 GOSUB 2600 

286 POSITION 26,4:7 
N1:S51=2 

985 FOR #=1 T0 8 
990 POSITION SL,S8:INPUT Q$:Q=VAL€C0$S2:A 
CHI=Q:SIZSIHAINENT H 

1086 -PESITION -2, 1077 “ERREURS :"": GOSUB 

2630 

1610 


‘EN ‘> CH: POSITION 23,4:7 


MO :POSITION 5S51,4:7 


POSITION 3,12:7 


F3 SOLUTION": 


POSITION 19,1Z:INPUT REPONSES 
REPONSE=UVAL (REPONSES 

ON REPONSE GOTO 1029%,10460:SI-2Z 
SI=2:FOR H=1 TO 8 

POSITION SIL,14:IMNPUT Q'ACHI=Q:SL—- 


‘EU CORRECTION 


1620 
1625 
16026 
102% 
1656 
SIrs 
LOS1 NEXT X 

16046 POSITION 96,16:7?7 PS:POSITION 6,18: 
? PS:SXI=2 

1059 FOR I=1 TO 8 

16696 POSITION SI,17:7 NID :S3L=SL+4 
1976 NEXT ZI 

1086 GOSUE 2740 

1085 ON REP GOTO 3560,970,106,10930 

1090 REM 622 MEEEEE Pu D> I IE LA 6-6 
116090 GRAPHICS 23:A=158:SETCOLOR 4,6,12 
1112 FOR V=O TO 95 STEP 3 

1129 FOR U=9 TO 2:COLOR L+1 

1159 PLOT O,Ut+U: DRAMTO à,U+L 

11496 SOUND 1,106-V,16,10 

1145 COLOR © 

1159 NEXT L:NENT V:SOUND 1,60,6,0 

11696 LET A=48:LET B=SS:LET D=SO:LET C- 

S0:GO0SUB 27148 
1179 LET A=60 
1180 LET A=680 
11906 LET A=960 
2162 

12906 LET AZ=A4S:LET C=SO:LET E=110:LET DB 
=126:GOSUB 2134 

12065 FOR AT=1590 TO 2660:SOUND L,AT-45,1 
6,10 

1210 A=PEEKC7113 :POKE 
KE 710,PEEK€7099 :POKE 


KE 708,A 
1215 NEXKXT AT:SOUND 1,90,6,0 


1270 FOR X=1 TO Z2OO0:NEXNXT hH:END 

2006 REM KA#MHM#SOUS PROGRAMME S PERMREMEMMER 
20609 REM K#LO.BKISO., OA . MHMMMEMHER 

2616 FOR 4=49 TO 45:PLOT À ,19:DRAMTO À 
19: NEXT À 

2912 FOR B=-19 TO 11:PLOT 
S,B:NEXT 68 

2614 PLOT S50,12:DRANTO SS,127 

2616 FOR B=13 TO 1S:PLOT 45,B:DRAMTO 5 
S,B:NEXT 6 

2618 FOR B=15 TO 16:PLOT 45,B:DRAMNTO 6 
8,B:NEXT 5 

2626 PLOT 55,1/:DRAMTO 66,17 

26022 FOR B=18 TO 193:PLOT 45,B6:DRAMTO 6 
8,B:NEXT 5 

29024 RETURN 

2636 FOR ÀA=79 TO 7S:PLOT 
»19:NEXT À 

2634 FOR A=8S TO 960:PLOT 
19:NEKT À 

2036 FOR B=19 TO 12:PLOT ?75,B:DRAMTO 8 
S,B':NEXT 6 

2957 FOR B=17 TO 19:PLOT 75,B:DRAMTO 8 
S,B:NEXT 6 

2058 RETURN 

2040 FOR A=1968 TO 195:PLOT 


GOSUB 2171 
GOSUB 21418 
LET E=9S:LET 68-105 :GOSUB 


T11,PEEKC710)9 :PO 
709,PEEK(70689 : PO 


45,B:DRANTO 5 


A, 10: DRAMTO À 


ÀA,190:DRAMTO À 


A, 19: DRAMTO 





21 


A;19:NEXT À 
2050 FOR A=115 TO 120:PLOT A,10:DRAMTO 
A;1S:NENT À 
2066 FOR A=18 TO 12:FOR B=115 TO 111 5 
TEP -1:PLOT 105,A:DRAMTO B,19:MEXT B:N 
EXT À 
2070 RETURN 
20896 REM #99 ,C#LOO.O0W110.1UK170.R%ZS 
B.A*X1S0.GH162,E%RxrX 
2090 FOR H=A TO B:PLOT H,B+B:DRAMTO X, 
D:NEXT KH 
26092 FOR KX=B+B TO B+B+S:PLOT B,K:DRAMT 
O C,H:NENT x 
2694 FOR K=D-5 TO D:PLOT B,H:DRAMTO C, 
KH:NENXT x 
2996 RETURN 
2106 FOR X=zA TO A+S:PLOT K,D:DRAMTO X, 
C:NEXT x 
2102 FOR K{=B-5S TO B:PLOT X,D:DRAMTO X, 
C:NEXT X 
2104 FOR Y=D TO D+S:PLOT D,Y 
S,Y:NEXT v 
2106 FOR Y=C-5 T0 C:PLOT D,Y:DRAMTO D+ 
S,Y:NEXNT Y 
2108 RETURN 
2110 FOR KH=A TO C:PLOT X,D:DRAMTO K,C: 
NEXT K 
2112 FOR X=B TO Bt+S:PLOT HX,D:DRANTO K, 
C:NEXT x 
2114 FOR Y=C-S TO C:PLOT C,Y:DRAMTO B, 
Y:NEXT Y 
2116 RETURN 
2120 FOR H=A TO A+*S:PLOT HX,D:DRAMTO X, 
C:NEXT x 
2122 FOR K=B TO E:PLOT K,D:DRAMTO X,C- 
1O60:NEXT X 
2124 FOR Y=D TO D+3:PLOT A+S,Y:DRAMTO 
B,Y:NENXT + 
2126 FOR YV=D+7 TO D+10:PLOT ÀA+*S,Y:DRAWM 
TO B,Y:NEXT Y 
2128 FOR K=O TO 4:PLOT A+S+H,D+10:DRAM 
TO E,C-K:NEMT X 
2130 RETURN 
2134 FOR K=A TO C:PLOT E,K:DRAMTO Et+15 
2HINEMT KH 
2155 FOR KH=B TO B+S:PLOT KX,D:DRAMTO XKH, 
C:NEXT X 
2136 FOR KH=E TO E+S:PLOT KX,D:DRAMTO K, 
C:NEXT x 
2157 RETURN 
2138 FOR K=96 TO 4:PLOT A+S+KH,D+10:DRAM 
TO E,C-H:NENT x 
2146 FOR K=A TO A+S:PLOT H,D:DRAMTO X, 
C:NEXT KH 
2142,FOR X=B-S TO B:PLOT KH,D:DRAMTO X, 
CNET X 
2143 FOR Y=LD TO D+5:PLOT A+S,Y:DRAMNTO 
B-5S,T1NENT 
2144 FOR Y=D+19 TO Dt+1Z2:PLOT A+#+S,Y:DRA 
WTO B-S,VY:NEXT Y 
2146 RETURN 
2148 FOR KH=A 
C:NEXT XX 
2149 RETURN 
2150 FOR KH=A TO A+S:PLOT K,D:DRAMTO K, 
C:NEXT x 
LISE FOR TB FO- B+S:PLOT- A+S; Y: DRANTO 
B,Y:NENT Ÿ 
2154 FOR Y=C-5 TO C:PLOT A+#+5,Y:DRAMTO 
B,Y:NENT ŸY 
2156 FOR Y=-D+19 TO DtiZ:PLOT A+190,Y:DR 
AUTO B,V: NET % 
2158 FOR KH=B-3 TO B:PLOT K,Dt+10:DRAMTO 
H,C-S:NEXT K 
2166 RETURN 
2162 FOR KH=A TO E:PLOT A4,D:DRAMTO H,C: 
NEXT %*X 
2164 FOR Y=D TO D+S:PLOT E,Y:DRAMTO 86, 
VYVINEHT Ÿ 
2166 FOR Y=C-S TO C:PLOT E,Y:DRAMTO 6, 
V:NEXT Y 
2168 FOR Y=D+B TO D+1Z2:PLOT E,Y:DRAMTO 
B-S,V:NENXT Y { 
2179 RETURM 
2171 FOR KH=A TO At+S:PLOT KH,D:DRAMTO K, 
C:NENT XX 
2172 FOR K4=6S TO 7O:PLOT K,SFSB:PRANTO K 
+5, SS:NENT %X 
2175 FOR 4279 TO 7S:PLOT KH,5S:DRANTO KH 
:AS:NENT K 
2174 FOR K=79 TO 75 


DRAMTO D+ 


TO AFS: PLOT H,D:DRAMTO XX, 


PLOT H,4S:DRAMTO %# 


—S, SO:NEXT 

2475 RETURN 

2160 REM MMMCALOUL DE CL , 1 26-66-66 
2182 FOR I=1 TO :FOR J=L+1 TO & 

2184 IF NCLD>2NCN) THEN T=f CAL : M CID ZM CJ 
2:NCJI2=-T 

2185 NEXT J:MEUTY L:RETURM 

21990 REM HAMEMEAFEF . SOL CS OR ES 
22606 POSITION 6,14:7 PS:POSIVION 9,17: 
? PS 

2285 FOR HM=O TO ZO:'NENHXT M 

2207 POSITION 2,16 

2219 FOR L=1 TO 9:7 N£CED:'° SSINENT ZI 
22715 FOR H=9 TO JSO:MEXT HW 

2276 POSITION 2,18:7 ‘UN MEME EXERCICE 





Ki MENU! 
2225 POSITION 2,20:7 ‘4j L'INVERSE 

O Fzn' 
22350 POSITION 17,21: INPUT REPS:ROP-A4SC 
CREP $) 


2231 IF ROP> 52 THEN 2259 

2257 REPTUVAL L(REPS)D 

2249 RETURN 

2250 REM MHHÉDETECTION ERRELER 5 6-26-26-x-26-HEX 

2260 LET ET=15 

2261 POSITION 2,7:7 "“ÆERRELRS:!'" 

22790 FOR I=L T0 9 

2275 IF NÇCLI = CID 

229390 IF M£CLI &> 4 CL 

? MES ETSRET+r2Z 

2285 MNEXT ZI 

2779 RETURN 

2506 REM CALCUL DES NOMBRE S Mr 

2S10 FOR I=1 TO #8 

23515 AZLMTCRMND CO2 629 +1 

235320 FOR J=2 TO L:IF A=NCJ)D 

2825 NEXAT J:MNILI=AINENXT ZX 

23533530 RETURN 

Z2SA4O REM dre 0 AL MC MS . 2 b-é-D6-hE-pt-pé-DE DEEE 

2S42 FOR IS1 TO 7:FOR J=1I+1 TO #8 

2SA4ZT IF NCXD KMC.19 THEN T=MCID:NÇCLDI=MCN 

2:MNÇCUJIZ=T 

2545 NEXT J:NENT L:RETLURN 

23546 REM  %EHt-h-é-6-p6MEE DE COR 36-26-ni-Mé-#6-p6- M 

23590 POSITION H4,Y:7 TS: TS", : RETURN 

2560 REM *AHMDET.ENRREULURS, TABL . MERE 

2565 LET ET=19 

23790 FOR K=1 TO #8 

2375 IF ACHI=NEHI-CH THEN GOTO 23585 

2360 IF ACHI <>)MCHI-CH THEN POSITION ET 

16017 OMS ETSETEL 

23585 NENHT X 

2#97 LET ET=:10 

2590 FOR Xz1 TO 8 

28595 IF AACHI=NCHMIICM THEN GOTO 2405 

2400 LF AACHI LINCHIFCM THEN POSITION E 

Vos? Le PETSETÉL 

2495 NEMT HX:RETURN 

2415 REM ÆÉMRINPUT Q POUR Pas da da be-ht-hé-é-p6-ht-hé-hl 

24350 FOR H{=1 TO #5 

2440 POSITION S,M#+X:LIMPUT GS:0=UAL COS 

1ACHI=Q 

2450 POSITION 55,M#+M: INPUT 

2: AA CHI =N 

2469 NEXT H:RETURN 

2500 REM ÆMMMMENLN TABLE ALI DE-RE-E-HEE 

2585 POSITION 3,260:7 ‘'{4N MEME EXERCICE 
KEj MENU': 

2516 POSITION 3,22:7 ‘‘#j MENU TABLEAUX 
E FEn° 

2515 POSITION 21,21:IMNPUT REPS:ROP-ASC 

CREP5S)J 

2516 LF ROP>52 THEN 2515 

2517 REP=VAL(CREPS)I 

2520 RETURM 

2530 RE DM RE IP OM 55 fete 0 DE DEEP MED 

2540 POSITION 26,5:7 ‘'REPONSE!' 

2545 FOR K=1L TO 8 

2556 POSITION 26,M+H:7 NCMI-CH 

2555 POSITION S0Ü,M#+H:7 NIHI+CM 

25690 NEXT K:RETURNM 

2579 REM MMM C O MP VA GIE S MED DEEE DE 

2609 REM #KCAL.DES VAR.EMXTR,SELON CH 

2618 IF £Z=1 THEN NO=0 

26% LF Z'10 THEN MO=ILNIY CRND COD#ZD — CCM 

63 


THEN GOTO 2285 
THEN POSITION ET,7: 


THEN 257196 





US: QO=VAL COS 





2650 2626 
264€ 
2650 
2666 
2670 
2686 
26% 
27060 


IF ND<O THEN GOVO 
NI=HNO+LCCHEED 

FOR K=1 TO & 
MCHI=NOE COCHEÉMI 
NEHT M:RETURN 
REM #MERREURS C'OMP TAGE SEE ME MEME EE 
LET ETz1ù 

FOR I=1 TO 8 

2716 XF NCXI=AMCII VMEM GOTO 27356 

2220 XF NCXLD <> AUX THEN POSLXTION ET,19 
29 ME TSErTTrZ 


2730 NEKT LI:RETURN 

2740 REM ERMMENORTLENTATION MEN LI REREREMEREN 

2750 POSITION 5,20:7 ‘#4 MEME EXERCICE 
Ki MEML°"' 

2760 POSITION 5,22:7 ‘#1 NUX COMPTAGES 
EE Fan" 

2770 POSITION 21,21:XNPUT REF 

2790 RETURN 


4 DATA AUNTA TAÏL,ALLT,1620,47214,2H48, € 
429,2760, SAXE, Er Sears 

4 Data LrniL, 728, 46041 , 3606, 409%, BE, 46 
2H,459, 9046, ASP 19735 

DATA 470, LÉAL,A49H, SET ,:56$5,29558, #2 
 LERL, LEE REEE » LP 37 

16 DATA 2, PDA s MED 9 RO L à APP n LPS 
, EP46, 2890 DE» VS 9 LOGO T 

2640 DATA HALG, PSE, DEP, ATHO,SA2G, GHLE, 
DES A, CEE » RAR Se LEON, 2 7 4 






















+69 LATE 180, H6%, 1409, LOST, SS2É, 68H, 
250,247, 219,649, 2 mi 

AND DATA 2804, L?LE, LEFT » 1762, 1886, 2411 
7 2 CHE Er à EL RAD » 661,108, 16661 

495 DATA 10BS,4072, 60%, LHBE, L1LDSG, LÉ 
6 7» GG 6 , AGE, HASx, CeDAL 

Hi PAT 4E 6,2956,2409,1196,1562, Sem. 
Bir. ri4,5771, 2086, Lei 

SH Géré LEA. A +59, 45, 744  2ORG, 250, LS 
AL,4%%, L2m4, LA, LSOAS 

So Birth LS, 1412, LH E , AA, RÉTE, He, À 


102,619, 620, LoPA, LEUR 
62% DATE Let, À Ed s SUN» GAS » Pi à SE LE, EE A 


LL, 105%, 4 59, LE Lt 

685 PAT Pau, PNA , LEE A HANT, LIRE, LEUR , 
LAS, FAN, EOLd, OALT, 17873 

TU DATA 620, 1599, 146,568, ASTIL, 26 LS, 


F20,1591,4961,1397, 24462 

66e DATA TA14,2281,1228, 794,115, 987,12 
79,848, 1167, 937, LISIER 

S&LS DATA LEPR: 798, 1157, 987, 1281, F4, LA 
SY,937,1655,794,10778% dantre 

B?24 DATA 1141,1189,11360,1171,5590,1681 
:61Y,459,79P, LFIE,15356 

858 DATA Z21FL,4746, 619, 2420,I289,1464, 
1154,6260,618,615,176P2 

911 DATA 160%5,1817,07S, D1S7,24607,8726, 
SP0,1715,S1360,4069,29687 

sa Dati 616,2666,744,316506,2365,S5180, 1 
376,14655,18/6, 1069, 19677 

1H%8 DATA LAPS, AND, 2685,729%, 1876, 424,6 
21,1595,1686, 2070, 14466 

LL DATA LAP2A, LEA, LES, 1076, 463, 1789 
, 260607, 1166,1174,2324,148H90 

1208 DATA LOUA, PAGE, ABS, 1106, 1636, LI 
1,139,#686,2662,1899,22r715 

216 DATA 2689,2686,14190,2694,5S12, 2666 
,2689,2689, 2 TOI, SAR, RATE 

2048 DATA DITOITTTIE AGAT, Si, 2726,2738 
»  PIAN, LTEL, SAT, 2F7ES,25077 

2102 DATA 2729,26032,2832,612,26S1,2747 
ÉPEUs SLÉs PVEGL LTÉE, RSOUP 

Fir4 DATA 2625,2969,3087,S12, 2779, 2T2T 
23H, 512,8067,2725,28096 

2Ai42 DATA 2P29,2925,T1L1LL,SLZ, 2725, SALE, 
LARG à POET » LOT OP, 28 FEU 

2158 DATA 2965,517,2683,2735,2715,29#8 
» Fi, ÊTES, 2OTS, 2704, 2SA452 

2174 DATA 2B79,H12,1728, 1682, 2466,1477 
1666, 2% 07, 1260, 056, 16736 

RL DATA 1H14,1781,26078,2660, 25668, 114 
7,067, S12,1977,577, 16561 

2261 DATA LEGAL, 729,1608, LOT, A2, SALE, À 
608,729, 1028, 1905, 13816 

LS2S DATA L1SEZX,S1E, 1611, 1682, 2464, 1477 
AUS, 2077, 1966,572, 147% 

2370 DATA 744, 18235, S8070,4859,572, 744,15 
F7, LASS, 10909,1%09, 15824 

Z4HS DATA 744,26072,21020,10809,17068,35006 
, 24, L'HES, LASE, 867, LIADE 

2520 DATA 512,164, 162%, 744, LE1LL, LÉ, 
1069,17553, 2064,977, LISEZ 

2648 DATA BAG, LSÉR, 676, V44,6087, 1009, 2 
ODLX, 72, TED,: 166, LLGSL 

2V26 DAT FBSL, 994,1949,2906,2878, L6ÈEd 
»512:13r709% 











PRIT EORE CLCEDRE DE DUULE 
PR 0 0) UT 1 
HO RE SON cd M ML: L HAMNNNENl 
RE 
65 DIM A4S1E3 


#9 7% ‘'AUDULE JUS LME LEMOMETRÉATLIOM" 
0 TT ''AUEC QU SHNS ALGEBRE DE BOULE" 
He À OLA CM HA TEÉS : AMPUX À? 

AGO IF ASE" THEN 158 

105 Zi hé=t Si THEN 200 

1 1) 4 O7 12 SE 

150 *PREMNEZ VOTRE AUYSIIC 





GRAPHICS 17 
K mars 432% A7 (UC MECERNE DE DSL EL 
H=60:%=:40:COLDER 1 











155 
160 AEGTICXKX CO 
170 HATH#E CA CSD WE A Cr. 47 CH LS + CHKEI 








189 v=Tr+ Ch 34 ChT13D + CA 3 -CATL92 - ChTi 
A4D-CA=BI CPE TED CT SRI 
1%S PLOT K VY:GOT0 166 


GRAPHECS 7:27 MHPBREMEZ VOT RE JOYSTIC 
APE MAUFS SERIE BE LP 

K=GO:Y z4D: COLOR 1 

A=STICK CG) 
LF Aï:14 THEN 
Er ñh=6 THEN 


7 7 


PEN FA 
"1: H=HEA 











226 IF THEN KH=A4#+1 

298 LF ÀA=S5 THEN V=vV+i:N=Hti 
230 LF A:LS THEN Y=YT1 

22 LF ÀA:9 THEN YEV+L: AH TA 
ZA LF AT1LL THEN KH=X4-1 

226 IF T1 THEN YET-1L:H=KH TL 
“240 XF KH>iS9 YHEN X=H-1 

2AS IF HÇCZ THEN H=H#L 

250 IF YI2 THEN vV=vT#ti 

26S LF YPr7S8 THEN Y=Y-1L 

266 PLOT H,Y:GOTO 226 


14 DATA 2696, 140, 2808, SLA, 482, 2 446 , 2 
BBF, LFIG, 3287, LOG1, ALÉBS 

116 DATA 45H, 7076, 1060#,687, 1684, 29LE, 1 
126,60686, LOS, GET, 2PIIE2 

2% DATA LLGZ,LAAT, 10S2, IAE, 1499, 1445 
, 1087, 1487,1182, 1069, 174 14 

PS6 DANTN 172, 1187, LLZS, SENZ 
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FETITE ANNONCE À RENVOYER À PRESSIMAGE F 


SO Fa St MARTIN ,; 7ESDI9 FARIS 


RATA 


ASE 





CRETE LITE TE entrera 7 ET mo mm PAR mr D LAN D EP EI TV mA LL RE 





PROMOTION 
DISQUETTES VIERGES 


Si vous avez déjà été la victime de disquettes sans marque qui ne vous ont 
pas donné satisfaction, POKEY a une solution pour vous. 

Nous avons acheté de grosses quantités de disquettes TDK, une des marques 
les plus prestigieuses en supports magnétiques. 

Nous pouvons vous les proposer à un prix quasiment équivalent à de la 
vulgaire ‘démarquée”’. 


TDK 5”1/ 4 Simple face / Double densite 


La boite: JS TraRes 


Ce prix est le plus bas qu'il soit possible d'obtenir sur de la disquette de cette 
qualité. Il n’y a donc pas de prix plus bas pour des quantités supérieures. 
Vous pouvez les obtenir avec le bon de commande de la Boutique de 
Pressimage. 





LA BIBLIOTHEQUE DE PRESSIMAGE 


BP0O01 ATARI, guide de l'utilisateur 78F 
BP002 ATARI, premiers programmes - 108F 
BP003 Jeux en Basic sur ATARI 49F 
BP004 Premiers pas avec l'ATARI 80F 
BP005 102 programmes pour Atari 120F 
BP006 Assembleur de l'ATARI 110F 








ATTENTION! 


NE TARDEZ PAS 
A VOUS ABONNER 


POKEY 3 
EST LE DERNIER 
NUMERO DISPONIBLE EN| 
KIOSQUE OÙ LIBRAIRIE 











En attendant le prochain | 


VO Enveudl | 


MINITEL 


Faites le 36.15 
ettapez SM1 * POKEY 











MS SAN, D KR 
PFONE 


1e} to Cri 
EU GROCMELS L 5 
ÉBLPORE 
F9 ? HG: ASE BLEMUEIMIL 
RENOM RETENU GO SLA 2 Ent 3 IE 
LE N 





D'LA SPORE PULE r À 


PE » À 





AU set ÉRIC GE EN et" à AGE SORT SG | 
AZ UN APPLUEE SA Le ba Ein Es jou 
GÉRCRIIGOSUE Er HE n A Dex LR 

F9 AST!! dé Pa ta em Te un petzt 
instant": Gi ram 

66 FO TZ: TO LASER ELA MEMRD Hi PDODRE 





L'HMIMNEMN 
M DATA Let, Los, LEE, 
se Er 4 

HO. DATA 250, LOS, 262, HAL, 
DE, 2% 


> NUL à mA à 2€ à 


JE NÉE 0 0 5 A PES 0 AUDE , LL 


DD DATA Et, LE, LEA Lu 46 4 ER à AL on 568 à À 
Er sn #4 
AA Dh ls Loi 0 Sy LE ES CNE à 2, 46S 4 ROUE , LR 


s LEA, À Cr # 
LLE DAT un ASE, 
19% 

L'eU Dés ts 
m1 Ji ut 
Lot Dés Tuer EL, eOE 
r LUE 

LAN ren A 


#2 NA Er 


SERA on RUE à Los LOS, À 


2e GE EME à En À SE» ÉD LOGS , 2 


DUB sn NE UE PE ULGR, En LEUR 





165 4 EN 0 M 2 y À 2 68 à 8 on MEN 8 À 8 AL 


Le Dal ALES à OU on MORE op An SD ER à NE oo EN ne M dt à 
LEE nn #9 dt 
LOR Date 2, As UE, de DIE, EF 0 EH EN n 6 2 JL EF 


G », AL 


e 
et] 


RCD on LE à en ROUES à ND ES à 





D'OUL à 5 CO n CR» » dt, 


LDES , 248 , LE 





AO'OMEN Hu HN éà Fan, 2, LTÉE, M LEB, 6, 155, 135,6 
n 44853 

RE LT dt, 2, LOS à dd n RD à DE à D 9 D à LE 
Ds LES » M 

PE AC 5 NIMES € ES à 1 WE PORE GESx7%, 4 4 P0 





ME. Gi PTE à € À ln 


















22 Eh AL #1 £ Le: 

242 À Que TC © SREENR LL of FOR Mi = ER 
FO LOZS EI PONR JE GE Er En M IPS ENC LS SR Adi MD ME NE 
T 

Suds PARLE PHGA EL NEO VO PIRDKE ERZ2S@G 
HR , DS MENT M s 
£'ht HOon FEES à à GOSGUE LEO: GÉTO 2m 

L'h A : L'ART >) [5 Sr DRE Ge ne  FOSITE 
OM LA, 7 MG Mn di LL ENS EE 

24 COLOR 42%: ds dt ICE MIT) 63, à FLO 
T LL, fi: DRAMTE 18,1% 





HOLOR 545 3 PLU tn Es CHEN ER ALAER (6 5 FL ON 
DIRAIT UN 246, w 

à COLOR LEéELIPLON LS DROMTO LE, & : HAL UN 
NW L,Ss DRAM LE , 

SE ÉOLOt HALO LL, 185 DROIT 24%, LE Fr 
L',AADR OMAN LE à AL AL 

HI COLOR SH: PLOT ©, Sas DRAMTO M, LS ID él 
TO Le LI DRAMEL LS RETURN 

Seb ETES: FOR YO PFERIPOKE EX25Q%r 





w 




















UIPAIME 
15 44 à 


E+Ged, 24% 
49 4 ETES IE à P'OMCIE 











# US 0 FORTE 
4 Li FE » À 
ie 4 € 2 Fri | Pas Es] 





12 HORE 





D Er MH AE HE 6 
FORGE 





MEN For 














4H TU 
HT: LTPEEN à 
MD OMR CEE AMEN 2 In 
44 5e Ch 
L'A:) 


SGEN 410 
HN PARACIE 
il. 


TNEM HIPEEKCZHHIY 
POP, AI MORE 206, Ca? 


NS L2 STEP — L'SOUME G,I, À 
Er GONE 6,1, €, à S 4 L 0 : FOSLT 





Er ab 1 ED HE 








AP POSITION H, Ts 7 Mbps 

HD FMOUNE 20% ,bD 

AI POKE GILET, 29% FUSR LS EE 

SU EF PER L26 47 + GER EER ASS) Es» PSE 
HEIN ice 

5 LE GATE 

S2E4 FO TO 25% STE Fi SOME 1,IL, LE 





LS INENT 
He JL 


Jos CEIMO EE EN , ER 
STRTGCOIEZN FHEN 534 















FA BELL POGX OU LE. 637 6; lb a LL 
1B:D= PORIE # 
: LI Ge AND STRLS COMTE THEN 5564 





IF GT TH 
HIDE 
6 0 6 1 Gr CH 


EE Ed if 
EG 1 Os PORKE 


T4 





E+F6L, & 3: FORE 


Er? 




















SGEN LMI FOUR HEL TO 8: FOR TO LL!LO 
CNTE M, au E <> ] ; 

9 MENT LIMEMT M: 3 VHEN E=B+ XL 1060 
SU 20 : POGITLICOM FM à À "HE 
GER EN Ca EX 6h FX AI À. à 5 tFOKE 56 , Et 





So Eh à FENG ZE, 3: P0 PURES 
aie TL STI CE = VNEMN 6GLE 
Gé POKRE GEZTS, OSTE GUMILUE 662 TL 











THEM 62 





SE POKE E 
nn 4 de QU CN 


608, 6 3 POICIE 
‘8 € 

à NO GiPOSILITLION GE, LE 
MAL, HELD FOR ALI 


EvPEL,GIPOKE E+7 













Hé 7 
VO LEE + 1 © CIN D 





Eu, I MENT L'MEMN 45 SUUIME 


C CMS RP UN SU 
ST AILIG CE = A 
2 x Chi pa (Dr 


THEM 
THEM 6 
0 , €, 43, 


Ris "D: MER" 





5 
GOT 606 







Par] TO LEM KMS) : FOR = VO 1€:MN 
EUMT (ED OLIME À, A, An LE î 





AS Cw, A; 


S'ONRMNI L , EN, D, OUNEMN "oo EE s SE 


29 DATES GAL, Ed, 672 MA ALL, ANGES, 2 2e à AL 
ALT, NB LOUE à LL GE, ES CHE 

AE DANN LPO, LEZ, APE, LUE, 2074, LOI 
EN AE à À 0 ne À D A 7 4 ES, À HO EX Er 

A Dean AL PE, Et, 8 FER 0 7 D, LORE ES PER , 
EAST ,LAAT,L205S, 3206, € 9% 

TALD DATA SDS MASGE , LBE Te LEP on MDP, SLI E 
ss AESR, LTSS, AZ, BEN, 2 2HAS 

Ame DATA STEEL, FLE 6800 4 24 4j, SN AL A2 6 à 
AG, ARE, GE, LES, LEGO 

SO DATM LÉCZ, BOL, SM, LL, SIG LEP 
BL, 2768 7 n Hu D , Ab CEE À 27 8 7 GE 

Ge an HG LEE, RON TP 7, ES, 2 
0 PDT 0 AS TS dt à A 7200, GTR E , EPA 

608 DAV PIE à LEE A, MOT, PO, AE, 2 PA 
PUR P Po LUE A, LPO 5 ED, LOUE 
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TOUS LES PROGRAMMES ! 


Nous allons dans ce numéro commencer une liste quasiment complète de tout ce qui a été écrit, programmé, imaginé sur votre machine 
préférée. Vous allez le voir, ça en fait un paquet. La plupart n’ont jamais eu de distribution officielle et sont donc introuvables en 


dehors des réseaux. Et là, nous vous faisons confiance, c'est votre affaire. 







































































































































TITRE GENRE LANGAGE TITRE GENRE LANGE TITRE GENRE LANGAGE 
ZD MAZE ESCAPE LAC LME (1 BASIC CANBRIOLADE AVENTURE PAST CASINO BACCARAT CARTES MACHINE 
30 RED BAPON ESPACE MALHIMNE CHMDY Fest TOR ESA ADI MU MEME CASTLE HExA460N LAETRENTHE 22 BASIC 
“b TIC VAC TOE REFLEX TION MACHINE CAM Bel DEMRE FLE FURY MACHINE CASTLE MASSLE AVENTURE * ADR MACHINE 
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Voilà, c'est tout pour cette fois. La suite dans les prochains numéros. (qui ne seront disponibles que sur abonnement, nous vous 


le rappelons. Voir la nouvelle formule ! 
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ais qu'est-ce qui m'a poussé à 

m'intéresser à l'informatique 
plutôt qu’à la philatélie, comme mon 
père ? Hein, qu'est-ce qui? Au 
moins, sa collec’ avait l'avantage non 
négligeable de ne pas se déprécier 
dans le temps. Au contraire, ça pre- 
nait même de la valeur. Alors que l'in- 
formatique... Qui donnerait 
aujourd'hui plus de 200 balles pour 
un ZX81 ? Alors qu'il devrait être à 
la meilleure cote : ça a été un des 
tout premiers et il n’est plus fabriqué. 
Mon père, je lui dis : « Qu'est-ce qui 
n'est plus fabriqué et a été un des 
tout premiers ? », il me répond aussi 
sec : « Le 5 Cents colombien vert 
olive, cote actuelle: 250. 000 
francs ». 
ll faut s'y faire : l'informatique est 
loin d'être un investissement renta- 
ble, par les temps qui courent. Et 
notre pauvre vieil Atari, lui aussi, 
s'essoufle. S'essoufle ? Non, le 
terme est mal choisi. Il fait toujours 
les mêmes choses qu'auparavant, 
imperturbablement, ni plus ni moins 
vite. Par contre, d’autres sont appa- 
rus entre temps, meilleurs, plus rapi- 
des, moins chers. 
Il faut s’y faire : va falloir penser à 
changer de matériel. 


POURQUOI ? 


our répondre à cette question, il 
faut regarder d’un peu plus près 
comment fonctionne un ordinateur. 
J'en vois déjà certains qui hochent la 





tête d'un air entendu en pensant : 
« oh, eh, fastoche, on fait run, c'est 
vachement simple ! ». Oui, effective- 
ment, mais ce n'est pas de ça que je 
parle. Le fonctionnement interne est 
bien plus passionnant, et bien plus 
instructif. Rébarbatif, aussi. Mais il 
faut en savoir un minimum : suivez 
le guide. 

A l’intérieur d'un ordinateur, vous le 
savez, il y a un microprocesseur. 
C'est en quelque sorte le cerveau de 
la machine. Il y a des coprocesseurs, 
qu'on pourrait assimiler à des mem- 
bres, pour rester dans les comparai- 
sons anthropomorphiques. Et puis il 
y a des tas de résistances, de diodes, 
de bouts de fils électriques, de con- 
necteurs et de plaques de circuits 
imprimés sur lesquels je n'ai absolu- 
ment pas l'intention de m'étendre : 
ce sont les organes, les veines, les 
os, toute cette sorte de choses 
encombrantes. Enfin, il y a les con- 
necteurs (joystick, RS232, prise télé- 
vision, clavier. ) que je me permets 
de comparer à nos sens (vue, ouïe, 


toucher, … ), tantilest vrai que c'est 
ce qui permet à la machine de dialo- 
guer avec le monde extérieur. 
Permettez-moi de vous faire part 
d'une information zoologique de tout 
premier ordre. Savez-vous pourquoi 
les singes sont moins intelligents que 
les humains ? Parce que leur moëlle 
épinière est moins grosse que la 
nôtre. Intéressant, non ? Et savez- 
vous pourquoi les chiens - qui ont 
une moëlle épinière comparable à la 
nôtre - sont moins intelligents que 
nous ? Parce qu'étant à quatre pat- 
tes, leur colonne vertébrale est tor- 
due. Et leur moëlle épinière aussi, par 
voie de conséquence. 

Et alors, me direz-vous ? Alors, le 
transit des informations entre leur 
cerveau et le reste du corps se fait 
moins bien que chez l'homme (ou la 
femme, si j'ai le choix), parce qu'il est 
gêné par la faible taille du réseau con- 
ducteur - dans un cas - ou par sa 
forme inadaptée - dans l’autre. Vous 
commencez à voir où je veux en 


venir : 35 
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D ans l’Atari 800, ou 130 XE, le 
« cerveau» -un 6502 - 
communique avec le reste à l'aide de 
huit fils électriques. Ce qui nous 
induit à penser que c'est peut-être 
pour ça que les constructeurs ont 
décidé d'appeler ça un 8 bits. Et on 
a raison, car c'est effectivement pour 
ça. Vous comprenez donc mainte- 
nant ce qu'est un 16 bits : un micro- 
processeur qui cause à ses copains 
à l’aide de seize fils électriques, ce 
qui lui permet d'en dire deux fois plus 
dans le même temps. D'où gain de 
vitesse considérable. 

Mais ce n'est pas tout. Il vous arrive 
de penser sans bouger, non ? A ce 
moment-là, il n'y a pas de transit des 
informations, sinon interne au cer- 
veau. Ca tourne dans la tête et ça 
n'en sort pas. Idem pour les ordina- 
teurs : il leur arrive de « réfléchir » 
sans avoir à dialoguer avec l'exté- 
rieur. Sur nos Atari, cela se fait tou- 
jours en 8 bits, c'est-à-dire à la même 
vitesse qu'un dialogue avec l'exté- 
rieur. Mais lorsque vous entendez 
parler d'un 16/32 bits, cela veut dire 
que lorsqu'il « réfléchit », il le fait en 
32 bits, deux fois plus vite que lors- 
que les informations ont du chemin 
à parcourir, quatre fois plus que notre 
pauvre petit 6502 |! 

Pourquoi, me demanderez-vous, ne 
pas fabriquer directement des 12 mil- 
liards de bits, ça irait drôlement plus 
vite ? Parce qu'on ne peut pas : ça 
serait grand comme deux tours Eif- 
fel côte à côte et ça consommerait 
autant en une seconde qu'un cyclo- 
tron pendant 127 ans. Mais rassurez- 
vous, les japonais et les américains 
travaillent sur des 128 bits, un peu 
de patience. 


En attendant le prochain 
POKEY 


VOTRE serveur 


MINITEL 


Faites le 36.15 
et tapez SM1 * POKEY 





QUEL 16/32 ? 


O ui, l’achat d’un nouvel ordina- 
teur implique l'abandon de votre 
Atari. Mais est-ce si grave ? Vous ne 
pourrez plus faire ce que vous aviez 
l'habitude de faire, mais vous pour- 
rez faire mieux. Vous ne pourrez plus 
utiliser votre logithèque, mais celles 
qui s'offrent à vous sont presque 
aussi fournies en quantité, et large- 
ment supérieures en qualité. D'ail- 
leurs, vous pouvez faire comme tous 
ceux qui ont déjà franchi le pas : vous 
achetez une nouvelle machine et 
vous gardez l’ancienne à la même 
place, en pensant : « Ce n'est pas 
parce que j'en achète une autre que 
je vais laisser tomber celle-ci ». Et 
puis vous allez vous apercevoir très 
rapidement que vous ne vous servi- 
rez plus du tout de l’ancienne. Parce 
que ce qui vous a plu dans l'Atari, 
c'est la découverte, la recherche, la 
nouveauté, c'est aller plus loin dans 
un programme ou dans la machine ; 
mais la prochaine que vous achète- 
rez vous offrira bien plus de possibi- 
lités, vous permettra d'aller plus loin 
encore. 


QUEL 16/32 ? 
(DEUXIEME 
PARTIE) 


MI ais quelle machine ? Exami- 
nons les possibilités qui s’of- 
frent à vous. À tout seigneur tout 
honneur, commençons par le vété- 
ran : le Macintosh. Il y a quelque 
chose qu'on ne peut pas nier : il est 
chic. Quand vous avez un Mac nédgjli- 
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gemment vautré sur le plus beau 
bureau du salon, on peut pas dire, ça 
en jette. Par contre, comme-tout se 
paye, il est cher. Très cher. Sans par- 
ler des accessoires, qui sont carré- 
ment hors de prix, lorsqu'ils ont la 
bonne idée d’être disponibles, ce qui 
est tout de même assez rare. Les logi- 
ciels sont en général superbes, mais, 
là encore, les prix sont exorbitifs (ce 
qui est pire que prohibitif et exorbi- 
tant à la fois). 


A moins que vous ne soyez million- 
naire, franchement, ce n'est pas la 
machine que je vous recommande- 
rais. 

Et l’Amiga, dites-moi ? Voilà une 
machine qui devrait être bonne. 
Après tout, elle est fabriquée par 
Commodore, qui a déjà fait ses preu- 
ves avec le C64, une des bécanes les 
plus vendues au monde. Regardons 
ça de plus près. 

C'est vrai, il est beau. On peut affi- 
cher 32 couleurs à l'écran, choisies 
parmi une palette de 4096. Impres- 
sionnant. Il est multi-tâches, c'est-à- 
dire qu'on peut exécuter plusieurs 
programmes en même temps. 
impressionnant. Il fait de la musique 
en stéréo. impressionnant. Mais je ne 
vous le conseille pas. 

Difficile de dire pourquoi, d'ailleurs. 
C'est un ensemble de choses qui font 
que ce n'est pas la machine du futur. 
D'abord, la situation financière de 
Commodore n'est pas au beau fixe. 
Que ferez-vous si tout d’un coup il 
n'y a plus personne pour assurer le 
service après-vente ? Même si d'au- 
cuns prétendent qu'il n'existe déjà 
pas ? Ensuite, les changements de 
direction successifs n'ont jamais été 
bénéfiques pour une société. Et là, il 
y en a beaucoup. D'ailleurs, bizarre- 
ment, beaucoup de gens quittent 
Commodore pour aller travailler chez 
Atari. 

Et puis, il n'existe toujours pas de 
logithèque digne de ce nom. Certes, 
les cinquante programmes disponi- 
bles sont superbes, fantastiques, 
rapides, impressionants. Mais cin- 
quante, hein, c'est pas là-dedans que 
vous allez pouvoir faire un choix vala- 
ble. Et puis, entre nous, le lecteur de 
disquette va à la vitesse d'un camion 
sur l'autoroute du sud un 31 août. 
C'est un détail, je sais, mais lorsqu'en 
allumant la machine on doit attendre 
deux minutes qu'un programme se 
charge, c'est rédhibitoire. 

Je parlerais bien aussi du prix, mais 
de nouvelles versions moins chères 
vont sortir bientôt. Enfin un point 
positif. à 


LE DERNIER 


t puis le petit dernier, celui vers 

lequel va ma préférence, j'aime 
autant vous l'avouer tout de suite : 
l'Atari ST. 
Tiens ? Je sens frémir votre paupière 
gauche. Oui, j'ai bien dit Atari. Ca 
vous dit quelque chose ? C'est nor- 
mal, c'est la marque de l'ordinateur 
que vous avez déjà. On ne sort pas 
de la famille. 
Avant de vous parler de la machine 
elle-même, j'aimerais vous parler un 
peu de son histoire : ça ne manque 
pas de sel. 
Quand il était petit, Jack Tramiel était 
juif et polonais. En soi, ce n'est pas 
dramatique, sauf quand on est en 
pleine guerre de 40, car on a de gran- 
des chances de se faire déporter. Et 
c'est précisement ce qui lui arrive 
(soyez gentil, lisez ce texte en pen- 
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DISQUE DUR 20 MO 


Pendant ce temps-là, vers la fin des 
années soixante, un petit mec tota- 
lement inconnu commence à bidouil- 
ler sur des circuits intégrés. Il brûle 
eprom après eprom dans sa petite 
chambre de bonne sordide, y passe 
ses jours et ses nuits, s'alimente à 
peine. Un jour, il sort enfin de son 
capharnaüm, les yeux rougis par la 
fatigue, une plaque de composants à 
la main. Sur cette plaque, il y a une 
révolution, un programme qui va 
changer la face du monde : le Break- 
Out. Vous vous rappelez, le jeu qu'on 
trouvait dans les cafés, le fameux 
mur de briques. Fan de John Wayne, 
il monte une petite société pour le 
commercialiser qui s'appelle Atari (à 
cause du film du même nom). Mais 
rapidement, il est débordé par le suc- 
cès et se retrouve obligé de vendre 
à Warner. 


Revenons un instant à Jack Tramiel. 


LECTEUR DE DISQUETTES 3 1/2 SIMPLE FACE 
LECTEUR DE DISQUETTES 3 1/2 DOUBLE FACE 
LECTEUR DE DISQUETTES 3 1/2 DOUBLE FACE 
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LECTEUR DE DISQUETTES 5 1/4 CUMANA 


MONITEUR MONOCHROME 


MONITEUR COULEUR 


sant à Alain Decaux, merci). Mais il 
parvient à s'échapper du camp de 
concentration ou il est prisonnier et 
part pour les Etats-Unis. Pendant un 
certain temps, il exerce toutes sortes 
de petits métiers, comme chauffeur 
de taxi ou marchand de journaux. Un 
jour, il décide de monter sa propre 
boîte de réparation de machines à 
écrire, puis de les fabriquer. Puis 
c'est le tour des machines à écrire 
électriques. Un jour, il monte une 
usine qui fabrique des machines à 
calculer. Puis des ordinateurs : c'est 
la naissance de Commodore. Il lance 
le Kim, puis le Pet, puis le Vic 20, puis 
le C64. 





Commodore a beaucoup grossi, 
depuis ses débuts. Tramiel, s'il est 
toujours président, n’a plus le con- 
trôle absolu des décisions. Malgré ce 
problème, il met en chantier en col- 
laboration avec une petite société 
nommée Amiga une super machine 
16 bits. Jusqu'au jour où il décide de 
nommer son fils vice-président de 
Commodore : les actionnaires de la 
boîte refusent catégoriquement. Tra- 
miel claque la porte avec fracas et 
démissionne. 

Quasiment au chômage, il fonde une 
société nommée Tramiel Technolo- 
gies Limited, continue un peu ses 
recherches sur le 16 bits (car l'ingé- 


nieur qui avait tout développé l'a 
suivi) et intente un procès à Commo- 
dore qui a profité de l’aubaine pour 
racheter Amiga. 

Jusqu'au jour où Warner vient le voir. 
Les pertes s'accumulent, ils veulent 
revendre l'affaire. Tramiel se laisse 
convaincre et achète la compagnie 
pour 70 millions de dollars. Vous con- 
naissez la suite : il rajeunit la gamme 
XL en l'appelant XE et en la redessi- 
nant, il lance le 130 XE et enfin, le 
ST (qui veut dire Seize-Trente-deux, 
Sixteen-Thirty two). 

Quelle vie passionnante, non ? Si 
vous êtes sages, je vous raconterai 
des anecdotes sur lui la prochaine 
fois. Auparavant, revenons au sujet 
qui nous préoccupe : le ST. 


EN ROUTE 
VERS DE 
NOUVELLES 
AVENTURES 


es ôté hard, le ST peut faire des 
envieux. Six coprocesseurs 
viennent aider le 68000, accélérant 
le traitement des données. Il est 
équipé d’un port souris/joystick et 
d'un port joystick tout seul. Une 
RS232 (liaison série) et une Centro- 
nics (liaison parallèle) permettent à 
elles deux de brancher tous les 
modems, imprimantes, minitel, 
tablettes graphiques que vous pou- 
vez imaginer. Un port cartouche, un 
port disque dur et un port lecteur de 
disquettes permettent de brancher 
respectivement, et on s'en serait 
douté, une cartouche, un disque dur 
et un lecteur de disquettes. 

Un même connecteur permet de 
brancher un moniteur couleur, un 
téléviseur ou un moniteur monoch- 
rome ; on trouve en outre, et on y 
reviendra, deux prises Midi. 

Tout n’est pas rose, cependant. Si le 
port cartouche ressemble à celui du 
800 XL, on ne peut pas y enficher 
des cartouches écrites pour le XL : 
les deux machines sont totalement 
incompatibles. Et lorsqu'on désire uti- 
liser un écran monochrome, on est 
obligé d'utiliser le modèle Atari, qui 
« tourne » en 70 Hz au lieu de 50 
pour tous les autres moniteurs (en 
Europe). Certes, ça a l'avantage 
d’avoir une qualité d'image absolu- 
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son arrivée sur le marché, 
A: y a quelques années 
FLIGHT SIMULATOR Il avait été 
salué comme le meilleur pro 
gramme de simulation. Il l'est 
toujours, et sans doute pour 
longtemps encore. 


C'est sans doute ce qui a incité 
SUBLOGIC à reprendre pour le 
ST ce logiciel initialement prevu 
pour les micros 8- Bits. 


Rappelons que la version 8-bits 
permettait de simuler pratique 
ment toutes les conditions d'un 
vol réel sur un petit monomoteur 
à train fixe, muni de tous les ins- 
tuments de bord 
nécéssaires dont la 
navigation. 

On pouvait ainsi décoller de 80 
aéroports des Etats-Unis et sur- 
voler quatre régions de ce pays 
(Chicago, New-York, Seattle et 
Los Angeles) ; et ce de jour ou 
de nuit, en n‘importe quelles sai 
sons et conditions météorologi 
ques, au choix de l'utilisateur. Le 
tout en temps réél. Ajoutez à 
celà un jeu de bataille aérienne 
avec de vieux « coucous » de la 
guerre de 14-18 et vous obte- 
niez un nombre de conditions 
tel, qu'il rendait la vie de ce 
« jeu » pratiquement illimitée ! 
C'était déjà beaucoup. 

Mais la version 8-bits se heurtait 
à deux écueils : 

- La lourdeur de la manipulation 
par touches (notamment pour 
toutes les commandes de radio 
navigation) 

La lenteur de réaction des 
commandes surtout qui rendait 
le pilotage en condition de vol 
réél (c'est à dire en option 
« non-assisté ») pratiquement 
impossible - et ne parlons pas 
des figures d'acrobatie. 


radio- 


Nous connaissons maints utili- 
sateurs qui après un décollage 
facile n'ont jamais pu réaliser 
une prise de terrain correcte et 
qui las de vaines tentatives, ont 
definitivement relègué leur simu 
lateur de vol aux oubliettes. 
Dommage ! ! 

La version ST de Flight Simula- 
tor permet non seulement de 
palier ces inconvenients, mais 
d'améliorer considérablement la 
simulation grâce au maniement 
de la souris et des fenêtres. 
De plus les menus déroulants 
permettent à tout moment d'ac 
cèder rapidement à toutes les 
fonctions désirées. 

Pour plus de clarté, nous allons 
envisager successivement tous 
les compartiments du pro- 
gramme en vous signalant au 
passage chacune des améliora- 
tions apportées. 


Le tableau de bord 

Il a été remanié. Extrèmement 
complet il est très net, et d'une 
parfaite lisibilité. 


Les commandes 

Elles se font au gré de l'utilisa- 
teur avec les touches du pavé 
numérique ou la souris. Il est 
devenu très facile de prendre un 
virage serré grâce à la remise 
instantanée au point neutre du 
palonnier et de la commande 
d'ailerons dès l'inclinaison dési 
rée atteinte. (Cette manœuvre 
était plus que problématique sur 
le 8-bits). Le levier de puissance 
et le manche de profondeur réa- 







gissent instantanément ce qui 
est agréable en cas de perte de 
vitesse ou de prise de terrain 
défectueuse, mais permet de 
plus maintenant toutes les figu 
res acrobatiques possibles (vril 
les, loopings, tonneaux etc.). En 
cas de vol non assisté par auto 
coordination, l'indispenssable 
balancement entre le palonnier 
et les ailerons se fait plus faci- 
lement avec les touches Île 
palonnier étant commandé par 
la main gauche et les ailerons 
par la droite). || devient ainsi 
facile de maintenir l'attitude de 
l'appareil en cas de virage serré 
quand ces commandes inver 
sent leur action). 

Deux fonctions supplémentaires 
sont accessibles du tableau de 
bord : la commande de train et 
le zooming depuis le cockpit. 

Signalons enfin que la com- 
mande par la souris est acces- 
sible à tout instant par cliquage 
du bouton droit et qu'elle est 
matérialisée par un voyant (la 
commande par touche reste 
possible même lorsque l'on 
pilote avec la souris). 


Les vues 3-D 


Les 47 aéroports de la région de 
San-Francisco complètent les 
80 qui figuraient déjà dans la 
version 8-bits, et la vue aérienne 
de la baie vaudrait à elle seule 
l'acquisition du logiciel ! En effet 
le paysage a non seulement 
gagné en définition et en cou- 
leurs (les 16 sont utilisées), mais 





les configurations sont mainte- 
nant « pleines » et non réduites 
au squelette. 
La vue du cockpit peut se faire 
en plein écran en supprimant le 
tableau de bord, ce qui donne 
une impression d'une réalité ver- 
tigineuse. Elle peut de plus être 
zoomée. Aux 8 vues périphéri- 
ques toujours disponibles s'ad- 
joint une vision panoramique par 
scrolling vertical ou horizontal 
avec retour instantané à la posi- 
tion frontale : vous pouvez 
maintenant tourner la tête de 
tout coté ! 
Vous pouvez au total ouvrir trois 
fenêtres simultanément sur 
l'écran. Outre la vue principale 
vous pouvez consulter une carte 
et suivre l'évolution de votre 
appareil : 

Depuis la tour de controle ou 

Depuis une voiture suiveuse ou 
- Depuis un avion suiveur. 
Bien entendu toutes ces vues 
sont « zoomables », et vous 
pouvez suivre l'évolution de 
votre avion de l'exterieur - ce 
qui est bien utile pour les figu- 
res acrobatiques - mais aussi 
assister à toutes vos (fausses) 
manœuvres, y compris à de dra- 
matiques crashs ! ! 
Mais ce n'est pas tout ! Vous 
pouvez aussi -et c'est sans 


doute l'un des « must » du pro- 
gramme - afficher l'angle sous 
lequel la voiture ou l'avion sui- 
veurs observeront votre appa 
reil, et la distance depuis laquelle 
ils le feront : par exemple la voi- 
ture peut vous suivre du côté 





droit, et l'avion vous observer 
par dessous à 50 pieds, du côté 
gauche ou par dessus à 1000 
pieds à la verticale. 

Le « plotting » (traçage) des 
évolutions de l'appareil qui exis- 
tait dans la version 8-bits est 
donc devenu inutile, puisque 
vous visualisez directement 
celles-ci à l'écran. 

D'autre part les cartes ne sont 
plus seulement orientées par 
rapport à la direction de l’appa 
reil, mais également par rapport 
au nord géographique, ce qui 
facilite grandement la naviga 
tion. 

C'est grâce à la barre de menu, 
affichée en permanence au som- 
met de l'écran et accessible par 
la souris, que vous pouvez choi- 
sir vos options. 


La barre de menu 

Elle propose sept menus dérou- 
lants : 

INFO 

Vous précise les caractèristi 
ques de VOS appareils. Car vous 
disposez, non seulement d'un 
CESSNA comme sur le 8-bits, 
MAIS AUSSI D'UN JET D’'AF- 
FAIRES, ce qui va remettre en 
question toutes vos notions de 
pilotage ! ! 


FILE 

Vous permet de choisir le mode 
de vol : CESSNA JET, démo ou 
jeu de guerre 14-18. 


VIEW 
Vous permet d'activer un écran 


ESSAIS LOGICIELS 

















secondaire sur lequel vous 
selectionnerez le mode et le type 
de visualisation de votre appa- 
reil depuis l'exterieur. 


ENVIRO 

Vous permet de modifier les 
conditions de l'environnement 
exterieur. Comme dans la ver- 
sion 8-bits vous pouvez choisir 
la saison (En hiver la nuit tombe 
plus tôt, et la neige ne vous tolè- 
rera pas d'atterrissage hors 
piste !), placer des couches de 
nuage à plusieurs niveaux, et 
installer des vents de force et de 
direction variables. 


SIM 

Avec ce menu vous pouvez fixer 
la fiabilité de votre avion (A O% 
les pannes seront fréquen- 
tes ! !}, les conditions de réa- 
lisme - il en à un peu moins que 
sur le 8-bits, mais il en reste suf- 
fisemment pour vous occuper, 
et l'on se passe facilement de 
dégivrer périodiquement le car- 
burateur ou de répartir la charge 
de carburant également sur les 
deux ailes ! -, la sensibilité des 
commandes enfin. 

Vous pourrez également effacer 
de l'écran tel ou tel cadran du 
tableau de bord si vous êtes un 
« fana » du pilotage à vue. Tou- 
tes ces options ne sont pas nou- 
velles mais leur accès est d'une 
très grande facilité, alors qu'il 
demandait sur la version 8-bits 
une astreignante manipulation 
des touches qui de surcroît inter- 
rompait le vol. 





NAV 

Vous permet d'afficher la carte 
sur l'écran et d'en fixer l’orien 
tation soit dans l'axe de vol, soit 
sur le nord ainsi que d'accèder 
au mode SLEW qui abrège le vol 
d'une région à l'autre. 

Deux nouveautés très interes 
santes : 


POSITION SET qui permet de 
connaître instantanément les 
coordonnées de vol et la posi 
tion de la tour de contrôle dont 
on dépend 


AUTOPILOT qui permet de 

passer en pilotage automatique 
après avoir fourni la vitesse du 
vent, l'altitude, le cap et la fré 
quence de la balise d'alligne- 
ment. 
Cette option facilite grandement 
le pilotage sans visibilté. En effet 
il est très difficile de surveiller les 
instruments pour maintenir la 
ligne de vol quand il faut en plus 
faire le travail du navigateur- 
radio, c'est à dire appeler la tour 
de contrôle, accorder les fré- 
quences des balises et tracer les 
caps suivis sur les cartes | 


Notons toutefois que là encore 
la manipulation de la souris faci- 
lite grandement les choses : il 
suffit de cliquer sur les indica 
teurs pour accorder les 
fréquences-radio (rappelons que 
sur les 8-bits il falait taper con 
trol nav 2-control nav 2 -chiffre 
pour s'accorder sur VOR 2 en 
décimales ! 1! 1} 


SITUATIONS 

Permet enfin diverses options 
dont plusieurs sont nouvelles où 
améliorées. 

- Se placer instantanément dans 
une situation pré-enregistrée (Il 
y en a 5). 

Fixer les coordonnées d'une 
nouvelle situation : non seule- 
ment vous vous y trouvez immié- 
diatement placé, mais elles sont 
gardées en mémoire et vous 
pouvez les rappeler tant que le 
micro n'est pas éteint. 

Sauver sur disque les mêmes 
situations ; vous pouvez ainsi 
par exemple enregister les posi- 
tions de tous les aéroports pour 
les appeler ensuite une autre fois 
et y placer directement votre 
avian. 

Rappeler pour la revivre la der- 
nière minute d'un vol effectué 
pour par exernple répéter une 
manœuvre délicate ! 


Il existe bien sûr d'autres fonc- 
tions que nous ne pouvons 
décrire dans ce bref aperçu. 
Signalons entre autres améliora 
tions le faît que l’image ne se 
trouble pas lorque le micro lit sur 
le disque de nouvelles données 
de visualisation. 

Le manuel qui accompagne le 
logiciel (malheureusement en 
anglais) est d'une présentation 
et d'une clarté parfaite. 

De nombreuses touches d'accès 
facile accomplissent les mêmes 
fonctions que la souris, ATTEN- 
TION toutefois au clavier 
AZERTY qui les localise diffé- 
remment ! 


ON PEU SE DEMANDER COM 
MENT SUBLOGIC POURRAIT 
FAIRE POUR AMELIORER 
ENCORE CE LOGICIEL EN TOUT 
POINT PARFAIT ! 








ment parfaite, sans scintillement ou 
moirage, mais ça a l'inconvénient de 
l'incompatibilité. D'autre part, les 
programmes conçus pour la couleur 
ne fonctionnent pas en monochrome, 
et réciproquement. On est donc 
obligé de s'acheter au moins un 
moniteur (si on compte sur le télévi- 
seur familial pour la couleur), ou de 
se limiter à une partie des logiciels 
seulement. 

Autre problème : celui du lecteur de 
disquettes. Il en existe en simple face 
et en double face. Naturellement, les 
programmes qui dépassent 360 Kilo 
octets (et il y en a quelques-uns) ne 


LES CARACTERISTIQUES 
TECHNIQUES 


Processeur : MC68000 (Moto- 
rola) à 8 Mhz 

Ram : 512 Ko ou 1 Mo selon 
modèle 

Système d'exploitation GEM 
(Graphics Environment Mana- 
ger) 

6 co-processeurs (son, clavier, 
entrées/sorties… } 

Pavé numérique, pavé de cur- 
seur 

10 touches de fonction 

2 prises Midi 

Interface disque dur 

RS 232 - Centronics 

2 ports joystick 

1 prise RVB 

3 résolutions (640*400 en 
monochrome, 640*200 en 4 
couleurs parmi 512, 320*200 
en 16 couleurs parmi 512) 

3 canaux de son, 1 de bruit 





.passent pas sur un lecteur simple 
face. La solution : s'acheter un lec- 
teur double face. Mais là encore, un 
problème va se poser : celui de la 
mémoire. Un 520 ST contient 512 
Ko de Ram (pourquoi 520, au fait ? 
Parce que 512 Ko font 524288 
octets, d'une part, et que la dénomi- 
nation « 512 » était déjà prise par 
Apple pour son Mac. Notons au pas- 
sage que Commodore a pris « 500 » 
pour son nouveau modèle parce que 
512 et 520, etc) et un 1040 ST con- 
tient 1024 Ko de Ram. Donc, un pro- 
gramme de plus de 500 Ko ne tourne 
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que sur 1040 ST. Quel casse-tête, 
pensez-vous ? Pas vraiment. 
D'abord, dites-vous bien que le cas 
se pose de la même façon avec les 
800 XL et les 130 XE. Et ensuite, on 
peut faire déjà énormément de cho- 
ses avec un 520 ST et un lecteur sim- 
ple face. C'est une question de bud- 
get, en fait. Ceux qui peuvent s'of- 
frir un 1040 s'en paieront un, les 
autres prendront un 520 et ne s'en 
sentiront pas plus mal, si vous vou- 
lez mon avis. 


LES 
LOGICIELS 


h, les logiciels. Qu'en dire ? Il 

y en a des tonnes et des tonnes, 
au moins plusieurs milliers. Des jeux 
à foison, des traitements de textes, 
des bases de données, des tableurs, 
des programmes de communication, 
de dessin, de musique, pédagogi- 
ques, monochromes, couleurs, à la 
souris, au joystick, au clavier, en vert 
avec des bandes oranges ou bien 
hyper-sobres : il y a de tout. Pensez, 
il existe déjà six basics, six karatés, 
au moins vingt traitements de textes, 
au total plus de cinquante langages... 


LES 
ILLOGICIELS 


ous voulez du hard ? Pas de pro- 

blème. Alors dans l’ordre anal- 
phabétique, je vous propose un digi- 
taliseur d'images en couleurs et en 
temps réel, un digitaliseur sonore 
aussi bon qu'un disque compact, une 
tablette graphique, un driver SMPTE 
(qui sert à synchroniser des bandes 
audio avec des bandes vidéo, tout ça 
raccord avec la Midi, bien sûr), un 
disque dur, une imprimante laser, un 
clavier sensitif, un lecteur de disquet- 
tes 5 pouces un quart, un émulateur 
Macintosh, un écran sensitif, un lec- 
teur de codes-barre, un Genlock (qui 
permet d'incruster des images du ST 
sur une image télé normale), un pro- 
grammeur d'Eproms, et ça sera tout 
pour le moment parce que je vais 
quand même pas passer une demi- 
journée à faire l'inventaire de ce qui 
existe. 





LES PRISES 
MIDI 


M on père, ce héros au sourire Si 
doux qui a un sens des valeurs 
si particulier, m'a dès ma plus tendre 
enfance détourné de la collection de 
timbres, me poussant vers la musi- 
que en prétendant que la philatélie 
n'offrait pas assez de débouchés. Et 
il avait bougrement raison, le cher 
homme. Et me voilà tel que vous me 
voyez, musicien dans l'âme, en 
attendant de l'être dans un studio. 
Alors, les prises Midi, permettez-moi 
de vous dire que c'est un peu un 
cadeau du ciel, genre la bénédiction, 
quoi. À quoi sert-ce, demandent les 
philatélistes endurcis ? Très simple : 
c'est une prise standard par laquelle 
transitent des informations standard 
entre des instruments de musique et 
des ordinateurs. Ce qui est extraor- 
dinaire, c'est que contrairement à la 
vidéo, l'informatique ou ia télévision, 
tous les fabricants du monde entier 
se sont mis d'accord sur un standard 
commun. Et donc, tous les synthéti- 
seurs, toutes les boîtes à rythmes, 
séquenceurs et autres guitares Midi 
sont compatibles entre eux, et avec 
les ordinateurs qui se plient à cette 
norme. 

Avec un ST, vous pouvez piloter 
autant d'instruments que vous vou- 
lez. Vous pouvez modifier ou sauve- 
garder des sons, jouer en direct, 
arranger vos morceaux, échanger 
des sons au format Atari avec des 
possesseurs du même synthé, créer 
des séquences, etc, etc. La liste est 
infinie. Dire Straits, Voulzy, Souchon, 
France Gall, tout le monde se met 
petit à petit au ST. 


AU REVOIR ! 


V ous trouverez page suivante un 
comparatif entre le basic XE/XL 
et un des basics du ST. Vous avez 
aussi les petits tableaux comparatifs 
qui égayent cet article. Ca devrait 
être suffisant pour que vous puissiez 
juger par vous-même en votre âme et 
conscience et en toute connaissance 
de cause. 

De toute facon, que vous gardiez 
votre XL/XE ou que vous achetiez un 
ST, franchement, vous vous amuse- 
rez sûrement plus qu'à contempler 
bêtement un 5 cents colombien vert 
olive. 


PROGRAMMES EN BASIC 
SUR XL/XE ET SUR ST 


Pour ceux qui ont l'habitude de programmer en Basic 


sur les 8-Bits Atari, le ST ouvre une multitude d’ho- 


rizons nouveaux et offre un plaisir de programmation 


incomparable. Jetons un coup d'œil aux différences 


qui existent entre Basic XL et GfA-Basic. 


ur le ST, contrairement aux 
S XL/XE, le Basic n’est pas ins- 

tallé en mémoire morte (ROM), 
ce qui est une bonne chose dans la 
mesure où le Basic-ST Atari est assez 
médiocre, pour ne pas dire pire. 
Vu le manque évident, plusieurs 
sociétés d'édition se sont lancées sur 
le créneau et ont développé bon nom- 
bre de Basics pour Atari, chacun 
espérant devenir le standard. Or, cha- 
que pays a ses habitudes et bien 
entendu, chacun a choisi son basic. 
Ainsi, en Angleterre, le Fast Basic est 
le plus répandu. En Allemagne et en 
France, c'est le GfA-Basic qui s'est 
imposé. Il est fabriqué par Data- 
Becker et distribué en France par 
Micro-Application. C'est évidemment 
celui dont nous avons choisi de vous 
parler. 


Premier point déroutant : larÿement 
inspiré du Pascal, le GfA n'a pas de 
numéros de ligne. On est donc obligé 
de remplacer les GOTO par des 
GOSUB PROCEDURE. Mais qu'est-ce 
qu'une procédure ? C'est un sous- 
programme tout bête qui commence 
par une étiquette (un mot quelconque 
qui permettra de l'identifier par la 
suite) et qui se termine par RETURN. 
Ainsi, le programme suivant : 


10 PRINT BONJOUR! ” 
20 GOTO 100 

JO REM. C7". 

HOMRETINN 7 

30 END 

100 PRINT "CA UA?” 

110 INPUT REPONSES 

120 GOTO 30 


S'écrira en Gfa : 


PRINT ”’BONJOUR” 

GOSUB QUESTION 

RENS. 

END 

PROCEDURE QUESTION 
PRINT ”CA UA?” 
INPUT REPONSES 

RETURN 


On peut ne pas voir immédiatement 
les avantages conférés par ce 
système ; ils sont pourtant nom- 
breux. Le premier, c’est la lisibilité et 
la clarté. Finis les GOTO superposés 
qui finissent par transformer un pro- 
gramme en plat de nouilles. Le 
second, c'est la rapidité de dévelop- 
pement, car si l'on est obligé de pas- 
ser un peu plus de temps sur la con- 
ception même du programme, on 
passe beaucoup moins de temps à le 
taper puisque tout est parfaitement 
structuré. On peut aussi passer des 
paramètres aux procédures sans 
avoir à jongler avec des variables. Et 
le troisième, c’est la lisibilité et la 
clarté, car on n'insistera jamais assez 
sur ces points. 


Deuxième point important : la ges- 
tion des chaînes de caractères. 


En effet, outre le fait que la désigna- 
tion a$(premier caractère, dernier 
caractère) puisse poser des problè- 
mes, elle a surtout pour inconvénient 
de rendre impossible l'existence de 
tableaux alphanumériques. Comment 
pourrait-on distinguer la portion de a$ 
allant du 2° au 5° caractère et la 2° 
colonne de la 5° ligne du tableau a$ ? 


Le GfA Basic dans ce domaine est 
tout-à-fait classique. LEFT$(A$, n) 
représente les n premiers caractères 
de a$ ; RIGHT${(A$, n) correspond 
aux n derniers caractères et 
MID$(A$, 2, 4) correspond à la sous- 
chaîne de 4 caractères qui com- 
mence à partir du second. 

En ce qui concerne le dimensionne- 
ment des variables, le GfA diffère 
aussi du Basic XL. A$ peut avoir une 
taille (presque) illimitée (en réalité, 
32767 caractères) et l'instruction 
DIM B$(10) a pour effet de créer 10 
variables (B$(O), B$(1)... B$(9)) de 
taille (presque) illimitée. 

Toujours dans le domaine des chaï- 
nes de caractères, quelques instruc- 
tions puissantes et originales sont à 
signaler : INSTR(A$, B$) recherche si 
B$ est compris dans A$ et indique à 
quel endroit de A$ elle commence. 
UPPERS$(A$) transforme toutes les 
miniscules de A$ en majuscules, y 
compris les caractères accentués, 
tandis que LOWERS$(A$) fait le con- 
traire. 


LE GRAPHISME 


Avant de passer en revue les nom- 
breuses commandes graphiques, 
voyons un peu quelles sont les carac- 
téristiques du ST. 

Il existe trois modes graphiques : le 
mode haute résolution monochrome 
(640*400) qui n'est accessible 
qu'avec un moniteur spécial. Les 
deux modes couleur utilisables avec 
un moniteur couleur ou une télévision 
(via la prise péritel) sont respecti 
vement 320*400 en 4 couleurs 
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(suite à la page 46) 


Malgré le peu de dynamisme 
constaté chez les éditeurs, les 
revendeurs et les importateurs 
français, on peut se féliciter 
que nos cousins d'Outre- 
Manche/Atlantique continuent 


de RED RAT SOFTWARE 





oilà un bon jeu de Tirez-Dans- 

Tout-Ce-Qui-Bouge. C'est très 
simple : un vaisseau inspiré de Cho- 
plifter, le Laser Hawk, se déplace sur 
un décor inspiré de Sky Blazer pour 
descendre des ennemis sortis tout 
droit de Fort Apocalypse. Comme 
vous pouvez le constater, tout ça n'a 
rien de très original, mais c'est tout- 
à-fait efficace, car le graphisme est 
très bon (puisque déjà éprouvé ail- 
leurs) et le scrolling horizontal excel- 
lent. Le bruitage est très correct, les 
couleurs aussi et c'est un jeu sans 
surprise. La seule difficulté consiste 
à atteindre les réservoirs d'énergie 
qui jalonnent le parcours. 
Ce programme est au logiciel ce que 
Spielberg est au cinéma : une recette 
bateau qui marche à tous les coups. 
Merci. 
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à sortir coûte que coûte d’'ex- 
cellents logiciels qui, s'ils sont 
certes moins bons que les ver- 
sions ST, tiennent quand 
même le haut du pavé et 
démontrent mieux que jamais 


de FIRST STAR SOFTWARE 


ttention : à ne surtout pas con- 

fondre avec Dash, aussi nommé 
Boulderdash Construction Set, piètre 
programme basic ne ressemblant que 
vaguement à Boulderdash, sans 
scrolling et fort lent. 


les capacités de la gamme 
XL/XE. Voici en exclusivité les 
dernières nouveautés glanées 
au hasard de nos voyages. 


Bref, après Boulderdash |, Boulder- 
dash Il et Super Boulderdash, voici 
Boulderdash Construction Kit. Ah, 
j'aime écrire des articles comme ca. 
On définit une touche de fonction qui 
écrit automatiquement « Boulder- 
dash », et hop, la moitié de l'article 
est faite. Regardez : Boulderdash 
XIV, Boulderdash CXXVII, Boulder- 
dash: MCMLXXXVII. Super, non ? 
Bref. 

Heureusement réalisé par les auteurs 
mêmes du Boulderdash original (oui, 
le vrai Boulderdash}), ce programme 
va vous demander un effort d'imagi- 
nation. Et pas pour résoudre les 
tableaux, figurez-vous, mais pour les 
créer |! Tout ce qui a fait le succès de 
Boulderdash (j'ai bien dit Boulder- 





dash) est là : diamants, caillasses qui 
tombent, explosifs... Et grâce à son 
graphisme toujours aussi soigné, on 
n’est pas décu par ce Boulderdash C. 
K. (je n’ai pas défini de touche pour 
Construction Kit}. Le jeu en lui-même 
est, vous vous en doutez, stricte- 
ment le même au point de vue anima- 
tion, scrolling et déplacements. La 
création des tableaux est d'une sim- 
plicité à faire pâlir bonjour, mais c'est 
tout de même un programme décon- 
seillé aux impatients et à ceux qui 
détestent Boulderdash |, Boulderdash 
Il, Boulderdash Ill et tous les autres 
Boulderdash (on ne m'enlèvera pas 
de l'idée que c'est quand même un 
nom bizarre, Boulderdash). 





oici la version XL/XE du célèbre 

jeu de société. Le principe est on 
ne peut plus simple : l'écran est 
divisé en deux zones, l’une contient 
le plateau de jeu, l’autre un petit bon- 
homme qui va vous aider et vous 
poser des questions. Vous choisissez 
le thème de la question qui va vous 
être posée (arts, littérature, histoire, 
sciences. ) en jetant une fléchette 
sur la case qui vous intéresse, et si 
vous arrivez à répondre, vous 
rejouez. Je vais pas vous expliquer 
complètement les règles du jeu, ce 
serait un peu fastidieux. Le problème, 
cependant, c'est qu'il n'existe pas 
encore de version française. Alors les 
questions, c'est du style : « Where 
shall we fight ? » et il faut répondre 
« On the beaches » {Churchill}. Il faut 
être vraiment très ferré sur l'English 
Way of Life. Ceux qui le sont pour- 
ront prendre plaisir à répondre aux 
3000 questions posées. Les autres 
feraient mieux de passer leur chemin 
et de continuer à jouer au Monopoly. 


SCORE : 06068210 


ncore une nouveauté sur XL. Cette 

fois-ci, vous êtes aux prises 
avec des squelettes qui sortent de 
terre. Ca ne vous rappelle rien ? Allez, 
un peu d'aide. L'action se passe dans 
un cimetière bourré de superbes pier- 
res tombales, et surtout de rapaces et 
de plantes carnivores qui font rien qu'à 
essayer de vous manger. Alors ? Vous 
voyez ? Oui, c’est bien une adaptation 
de Ghost’n'Goblins, ou du moins dans 
le principe. Car tout n'est pas exacte- 
ment semblable au jeu d'arcade : le 
personnage ne porte pas d'armure, et 
donc meurt dès qu'il est touché. De 
plus, le graphisme est excellent, et le 
mariage des couleurs est le plus beau 
qu'on puisse trouver sur XL. 
Un scrolling superbe ajoute à la qualité 
de l'animation. Il existe même une 


de FIREBIRD 


otre mission est simple : 

détruire tout ce qui bouge. Fas- 
toche et pas très original, non ? Vous 
avez peut-être déjà joué à Galaxion, 
Galactic Chase ou Xevious ? Quel est 
le point commun à ces trois jeux, 
j'écoute ? Oui, au fond ? Ils sont 
lents, absolument. Et en quoi War 
Hawk se distingue-t-il d'eux ? Oui ? 
Il est rapide, bravo. Par contre, le gra- 
phisme est loin d'être satisfaisant, ce 
qui gâche un peu le plaisir qu'on pour- 








option permettant de retourner à son 
point de départ, très pratique car l'ac- 
tion est continue. 

C'est un jeu assez difficile où il vous 
faudra beaucoup de temps pour attein- 
dre le second niveau, car les squelet- 
tes kamikazes ne vous laisseront aucun 
répit. 

Quelques trucs : il faut se débrouiller 
pour avoir toujours un champ de tir le 
plus long possible pour qu'il ne soit pas 
arrêté par une tombe. Le calme et la 
pondération sont des conditions sine 
qua non pour gagner à ce jeu, car s’il 
est répétitif et se base sur des réflexes 
rapides et sûrs, la réflexion y joue un 
rôle d'importance. 

Et en plus, une agréable musique 
accompagne le joueur jusqu'à sa 
mort. 


rait éprouver à jouer. Il est dommage 
que la page de présentation soit le 
seul truc un peu esthétique de l'en- 
semble. Les bruitages sont corrects, 
quand même, mais c'est à réserver 
aux fous du joystick. 


ea 


u: 


GREEN BERET 


de DE RE SOFTWARE 


3 usque là, personne n’a réussi à 
accomplir sa mission parfaite- 
ment. C'est pourquoi il a fallu faire 
appel aux fameux bérets verts, ultime 
chance de vaincre cet ennemi si bien 
entraîné. Et justement, les bérets 
verts, c'est vous. 

Et vous voilà, fusil d'assaut au poing, 
pourchassant les ennemis qui tentent 
de s'emparer d'un pont ou d'un 
camion citerne, et qui n’ont de cesse 
de vous avoir embroché au bout de 
leurs baïonnettes. 

Soutenu par un excellent scrolling 
horizontal, ce combat est le jeu d'ar- 


cade type qui manque à votre logithè- 
que. On en a tant parlé sur Commo- 





dore, le voici enfin sur XL, ne bou- 
dons pas notre plaisir ! 





WHO DARES 
WINS II 


éééé ! Une superbe image de 

présentation, un copyright 
1987, ca c'est du récent ! Mais que 
lis-je sur la jaquette pendant que le 
programme charge ? C'est une adap- 
tation de Commodore 64 ? Yéééé |! 
Génial ! Voilà, c'est chargé. Tiens, 
c'est pas beau. Ca alors, c'est vrai- 
ment pas beau du tout. Bon. Repre- 
nons logiquement. C'est effective- 
ment le même scénario que la version 
Commodore, ca, pas de problème. 


Par contre, le graphisme est vraiment 
nul. Je me demande pourquoi ils ont 
choisi vert caca d'oie, marron sale, 
jaune pisseux et rouge baveux 





PETITES ANNONCES 


comme couleurs. Sont-ils daltoniens, 
les pauvres ? Le principe du jeu est 
simple : tirez sur tout ce bouge avant 
que tout ce qui bouge ne vous tire 
dessus. Les intellos feraient mieux 
d'aller voir ailleurs si j'y suis, et d'ail- 
leurs jy suis, parce que franchement, 
j'ai mieux à faire que jouer à ça. Voilà. 
Les fans de Rambo, par contre, s'ils 
ne sont pas trop regardants sur la 
qualité des graphismes, peuvent s'en 
donner à cœur joie car ça tiraille dans 
tous les coins. C'est un peu dom- 
mage, ça aurait fait fureur en 1985. 


Puisque ces news vous ont plu (c'est 
ça ou deux baffes), voilà un avant- 
goût de ce que vous allez lire, que dis- 
je, dévorer, dans Pokey nouvelle for- 
mule. 

SCREAMING WINGS : 
étrangement à 1942. 


Ressemble 






UTILISER LE BON DE 
COMMANDE SITUE DANS 
LE CAHIER DES LISTINGS. 


TARZAN : Successeur de Jungle 
Hunt. 

OGRE : Un wargame développé ini- 
tialement sur ST. 

WINTER OLYMPIC : Tynesoft s’est- 
il racheté de Who Dares Wins Il ? 
Nous l’espérons. 

FIDGET : |! y a du Marble Madness 
dans l'air ! 

KICKSTART : Logiciel de Moto-cross 
à deux joueurs. 

SPEEDKING : Vous connaissez Pole 
Position ? Cette fois, c’est avec une 
moto. 

BMX SIMULATOR : Faites du Bicross 
sur plusieurs parcours. 

Et puis des tas d’autres jeux que nous 
n'avons pas non plus eu le temps de 
tester à fond, mais n'ayez crainte, 
nous le ferons pour le prochain 
numéro. De plus, tous ces jeux seront 
désormais notés. Ils n’ont qu'à bien 
se tenir | 









Nous avons le plaisir de vous annoncer la naissance d'une rubrique de petites annonces. Envoyez les vôtres à 
Pressimage. Veillez à ce qu'elles soient lisibles et pas trop longues. Merci d'avance | 


Je recherche tous habitants de Brétigny, Arpa- 
jon, Ste Geneviève ou environs possèdant un 
ordinateur Atari XL/XE pour mon club (15 à 
Brétigny). De préférence avec lecteur de dis- 
quette. Stimec Arnaud, 11 rue du dauphiné, 
91220 Brétigny S/0. Tel : 69-88-85-82 
Echange logiciels en disquettes pour Atari série 
XL/XE. En possède 1500. Vends aussi lecteur 
de K7 1010 + 80 logiciels K7 (langages- 
arcades-utilitaires) état impeccable, le tout 
500F. Prendre contact et laisser un message 
au 27. 46. 00. 06 ou écrire (réponse assurée) 
à Sylvain PETIT, 167 Av. Henri Barbusse, 
59770 MARLY. 
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Cherche contacts Atari 6OOXL, K7. Yves 
DOYER, 43 Allée des 
tilleuls, 59470 Wormhout. 


** 


Recherche possesseur Atari 800XL/130XE 
pour échange programmes jeux (disquette et 
K7). Regnier François, 229 rue de clairoix, le 
Pressis Brion, 60150 Thourotte, Tel : 44. 76. 
26. 42 


LEZ. 


Recherche possesseurs Atari 800XL pour 
échange de programmes, d'informations et de 
jeux ainsi qu'un club Atari à Nantes. 


DELAHAYE Richard, 44 route de Clisson, 
44200 NANTES 


“*# 


Recherche contacts pour échanges (K7 et Dis- 
quette). COLLIN Julien, 4 Av. des bénédictins, 
87000 LIMOGES, Tel : 55-33-36-06 


“+ 


Recherche possesseur de 130XE sur Toulouse 
pour me renseigner. Christian FLEURY, Lieu- 
dit « les pepils » THIL, 31530 LEVIGNAC 


++ 


Recherche contacts et matériel d'occasion. 
Arnaud Du Plessis, 20 quai Gallieni, 92150 
SURESNES, Tel : 47-72-35-14 





BIDOUILLE, BIDOUILLE ! 





Vous aimeriez bien aller jusqu'à la fin des jeux que vous possédez. Mais voilà, 
c'est impossible avec seulement trois ou quatre vies. Elles s'épuisent toujours avant 
la fin et la partie en reste là. En en ayant davantage, vous pourriez réussir à voir 
le bout du tunnel ! Bon, d'accord, en voilà déjà quelques-unes. 


gramme qui permet d'accéder à la 

lecture et à l'écriture de secteurs, 
comme Sherlock, Wizard, Diskey.…. 
Et bien sûr, de faire une copie du logi- 
ciel et de travailler sur cette copie, 
pour prévenir toute erreur de manipu- 
lation. 
Attention : tout programme indiqué 
« en fichier » doit être placé au début 
de la disquette. 
STICKY BEAR BASKET BOUNCE : on 
accède au secteur 7, on se positionne 
sur le byte 1A hexa (ou 26 en déci- 
mal), on change le 04 par un FO et on 
obtient 240 vies au lieu de 4. 
DROL : secteur 316, byte 78 hexa 
(120 décimal}, on change le 04 en FF 
et on obtient 255 vies au lieu de 4. 
QUASIMODO 2 en fichier : secteur 
63, byte 3D hexa (61 en décimal), on 
change le 04 par FF et on obtient 255 
vies. 
POLAR PIERRE : secteur 68, byte 3D 
hexa (toujours 61 en décimal), on 
change le 04 en FF et qu'est-ce qu'on 
obtient ? 255 vies. 
BRUCE LEE en fichier : secteur 22, 
byte 2A (42 décimal) pour le joueur 
1, on change le 09 en 63 et on 
obtient 99 vies. Pour le deuxième 
joueur, secteur 22, byte 23 hexa (35 
décimal}, on change naturellement le 
04 en 63. 
NEPTUNE'S DAUGHTERS en fichier : 
secteur 92, byte 79 hexa, on change 
le 05 en FF et on s'aperçoit avec stu- 
peur qu'on obtient 255 vies. 
OILS WELL en fichier : secteur 30, 
byte 1 hexa (1 en décimal, 1 en 
binaire et 1 en octal), on change le 03 
par FF et paf, 255 vies. 
ZAXXON 32 Ko en fichier : secteur 
5, byte 56 hexa (pour le décimal, fai- 
tes le calcul, après tout), on change 
le 03 par FF et vous connaissez la 
suite. 


L: suffit de disposer d'un pro- 


MS PACMAN en fichier : secteur 
104, byte 1F, on change le 04 par 09 
et on inscrit 9 vies à l'écran. Toujours 
secteur 104, byte 2B, on change le 
09 par 13 et on obtient 9 vies au lieu 
de 3 pour le joueur 2. Pour le joueur 
1, secteur 106, byte 1F, on change 
le 04 par O9. 

PACMAN JR en fichier : secteur 122, 
byte 2, on change le 04 par O9 et en 
byte OF, on change le O9 par 13. 
Enfin, secteur 124, byte 14, on 
change le O4 par O9. 
MATTERN'HORN en fichier : secteur 
74, byte 68 hexa, on change le 03 
par 09, on obtient 9 vies au lieu de 
3 (on peut en mettre davantage, mais 
c'est à vos risques et périls ! }. 
TREESURGEON en fichier : secteur 
260, byte 1E, on change le O5 par FF, 
on obtient 255 vies au lieu de 5. 
MARAUDER 2 en fichier : secteur 
228, byte 19 hexa, on change le 04 
en FF et nos quatre petites vies se 
transforment en deux cent cinquante 
cinq grosses vies. 

CONGO BONGO en fichier : secteur 
9, byte 74 hexa, on change le O2 par 
09, on obtient 9 vies au lieu de 2. 
KARATEKA : au secteur 347, bytes 
5 à 7, on change OE 85 BO » par « O1 
EA EA ». Puis au secteur 445 à par- 
tir du byte 20 hexa, au secteur 543 
à partir du byte 06 et au secteur 641 
à partir du byte 14 hexa, on change 
85 BO A9 1C 38 E5 BO en EA EA A9 
01 EA EA EA. On obtient ainsi une vie 
illimitée. 

CAVELORD en fichier : secteur 114, 
byte 11 hexa et même secteur, byte 
34 hexa (bon, j'arrête de dire hexa, 
c'est toujours en hexa), on change 
les 05 en 01 et on en fait autant sec- 
teur 122 byte 25 pour le OA et sec- 
teur 126, byte 45 pour le OF. Ainsi, 
on ne perd presque plus d'énergie en 
combattant les oiseaux. 


AARDVARK en fichier : secteur 4, 
byte 49 hexa, on change le 10 en 99 
et on obtient 99 morts au lieu de 10. 
Vies, pardon. 

JET BOOT JACK en fichier : secteur 
76, byte 11, on change le 05 par FF 
et on obtient. Oui, on obtient. 
TROLLS AND TRIBULATIONS : sec- 
teur 120, byte 30 hexa (ah oui, je le 
dis plus, hexa), on change le O5 par 
99 et on obtient 63 vies au lieu de 5. 
DANSTRIKES en fichier : secteur 46, 
byte 19, on change le 03 en O9. 
N'essayez pas davantage, ou vous 
perdrez des vies (des vraies, ce coup- 
ci, faites gaffe). 

SEAWOLF en fichier : secteur 26, 
byte 6A, on change le 30 en 90 et on 
obtient une durée de vie triple. 
DROP ZONE en fichier : secteur 7, 
byte 22, on change 02 par FF et on 
obtient 255 vies au lieu de 3. 
DEFENDER en fichier : secteur 12, 
byte 1D, on change 03 par FF. Devi- 
nez ce qui se passe. 

ZAXXON 48 Ko en fichier : secteur 
78, byte 79, on change le 03 en FF 
et on obtient FF vies. 

BC'S QUEST FOR TIRES en fichier : 
secteur 72, byte 64, on change le 05 
en 80 et on obtient 80 vies au lieu de 
5. 

HARD HAT MAC en couleurs : sec- 
teur 8 byte 29, on change le O2 par 
63 et on obtient 100 vies au lieu de 
&r 

CRISIS MOUNTAIN en fichier : sec- 
teur 130 byte 28, on change le O5 
par 20 et on obtient 32 lifes instead 
of 5. 

EVOLUTION en fichier : secteur 154 
byte 61, on change le O5 par FF et 
on obtient 255 vies au lieu de 5. 
HIJACK en fichier : secteur 196, 
byte 61, on change le 06 en FF et on 
obtient comme d'habitude. 

C'est tout pour cette fois-ci | 


Patrick Le Meitour. 


oilà le logiciel le plus stupéfiant 

depuis... Oh, au moins depuis 
Poitiers (732). Vous êtes un cartogra- 
phe et vous avez la mission de des- 
siner la carte d'un nouveau monde 
que l'on vient de découvrir dans l'es- 
pace. Ce qui nous induit à penser que 
vous êtes plutôt un topographe, mais 
on ne va pas chicaner pour si peu. 
Pour vous aider, vous avez un petit 
robot nommé Gérard. Il va parcourir 
pour vous le labyrinthe de salles qui 
couvre la planête. Et comme certai- 
nes salles contiennent des joyaux, 
vous allez en profiter pour en amas- 
ser le plus possible (les joyaux de l'es- 
pace ne sont pas imposables, c'est 
très intéressant). 
Les salles sont dessinées en perspec- 
tive et aucune n'est semblable à la 
précédente. Un appui sur la touche | 
transformera tour à tour Gérard en 
gyroscope, en sphère ou en machin 
(je dois avouer que je n'ai pas très 
bien vu ce que ca représentait). A 
tout instant, la touche M (comme 
Map) permet de voir quelle partie du 
labyrinthe a été effectuée. 


de RAINBIRD/MAGNETIC 
SCROLLS 


i vous ne l'avez pas vu sur ST, 
vous en avez au moins entendu 
parler : le voici enfin sur nos 8 bits. 


“TL <-1 M'2, 


HALL 
UERALT 





arassy 


Les couleurs sont superbes, mais on 
peut déplorer l'absence totale de 
bruitages (sauf quand on meurt, ce 
qui est très énervant). 


jamais allés sur la lune vont avoir du 
mal au début, mais c'est normal. 

L'absence de scrolling est compen- 
sée par un changement de tableaux 





Les difficultés vont croissant si l’on 
prend la précaution de commencer 
par le sud (où le relief est plus calme 
qu'ailleurs). Comme on se trouve en 
apesanteur, les mouvements ont une 
inertie qu'il faut combattre en perma- 
nence. Ceux d'entre vous qui ne sont 


La seule chose qui diffère de la ver- 
sion ST est la qualité des graphismes, 
moindre bien sûr à cause de la diffé- 
rence de résolution entre les deux 
machines. Le programme occupe 
tout de même deux faces en double 


L'URL ur 
TELL TT ISLE 
HE EL 


très rapide. L'ensemble n'est pas 
sans faire penser au très célèbre Mar- 
ble Madness, par son look général, 
ses couleurs et la qualité du gra- 
phisme. En bref, Electric Dreams 
frappe très fort pour son premier jeu 
sur XL/XE. À quand le prochain ? 


densité, il n'est donc utilisable 
qu'avec un 1050 ou un compatible. 
Comme sur ST, le texte est en plein 
écran et l'on peut « tirer » un parche- 
min qui contient l’image avec les tou- 
ches Select et Start, comme on tire 
un store. 

Un petit truc : chargez le programme 
en appuyant sur Select. Résultat ? 
Essayez, vous verrez | 

Le jeu commence ainsi : vous vous 
réveillez un beau matin du mois 
d'août en essayant de vous rappeler 
de la nuit passée. Dur ! une sacrée 
migraine vous taraude le crâne. Vous 
parvenez tout de même à vous rap- 
peler qu'alors que vous reveniez du 
supermarché, vous avez remarqué un 
étranger qui s'approchait de vous. II 
a sorti une matraque, et sans transi- 
tion, vous vous êtes réveillé un beau 
matin du mois d'août avec un mal de 
crâne. 

Ce jeu n'est pas conseillé aux débu- 
tants, car outre le fait qu'il soit en 
anglais, l'histoire est pour le moins 
ardue. Mais la réalisation est si belle ! 
Sans compter les trente superbes 
images que vous avez à découvrir. 


de RED RAT SOFTWARE 


ous voici sur la planète des Xxa- 

rion où règne une effervescence 
peu banale. Votre but : détruire les 
Disrupters pour récupérer les cristaux 
que ces derniers vous ont volé. Ils 
vous faut les poursuivre sur un gigan- 
tesque damier et leur tirer dessus 
pour arrêter leur fuite. Mais atten- 
tion : si vous tirez deux fois dessus, 
vous atteignez le cristal qui du coup 
se brise. Ils sont quand même faci- 
les à repérer : les cristaux sont verts 
et les Disrupters, blancs. 
Mais la course poursuite ne fait que 
commencer dans ce jeu en 3 dimen- 
sions où le meilleur moyen de se diri- 
ger reste le radar, qui offre une vue 
aérienne du champ de bataille. Les 
bruitages rythment agréablement le 
jeu, pour ne rien gâcher. 
Malheureusement, ce serait trop sim- 
ple si sur cette planète il n'y avait des 
murs non seulement infranchissables 
mais de plus mobiles. Ils vont pres- 
que aussi vite que votre vaisseau et 
à chaque contact, ils vous enlèvent 
un peu de votre oxygène (note à ceux 
qui trouvent bizarre qu'un mur 
« pompe » de l'oxygène : vous 
n'avez qu'à vous imaginer qu'il 
pompe votre écran protecteur éner- 
gétique, et le tour est joué). 
Le graphisme est très soigné, d'au- 
tant que vous pouvez choisir votre 
couleur de fond, ce qui est extrême- 
ment agréable pour de longues par- 
ties. 
La vitesse générale de ce jeu n'a 
aucun autre équivalent sur XL ! 


de TOTAL 
SYSTEMS 


CONTROL 


h, le ST vous fait rêver. Je vous 

comprends. Les fenêtres et les 
menus déroulants, on n'a pas fait 
mieux pour gagner du temps. Mais 
vous n'avez pas assez d'argent pour 
vous en offrir un ? Peu importe ! 
Vous pouvez gonfler votre XL avec 
G. O. S. (Gem Operating System), un 


TRACH: 1 
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système d'exploitation révolution- 
naire ! En effet, toutes les manipula- 
tions vont dorénavant se faire à l’aide 
du joystick. Inutile désormais de pas- 
ser des heures le dos courbé devant 
le clavier (enfin, le dos n'est pas face 
au clavier ; c'est la face qui est dos 
au clavier, Vous comprenez ? }. 

Cette version du Gem ressemble 
beaucoup à celle qui tourne sur le ST, 
avec trois icônes pour les drives A à 
C. La présentation est très dépouil- 
lée, puisque tout est accessible par 
menus déroulants : rien n'apparaît à 
l'écran. Une fois que vous avez posi- 
tionné le joystick sur la première de 


[TEFAL 


ENET TL LINE 





la fonction que vous désirez obtenir, 
vous appuyez sur le bouton feu, et 
c'est parti ! Bien sûr, celà demande 
une adresse et une précision que l’on 
n'acquiert qu'au bout de plusieurs 
essais, mais on s'y fait très vite. 
Ce n’est qu'un DOS de plus, mais son 
fonctionnement original en fait l'un 
des meilleurs utilitaires sur XL/XE, En 
plus 'de toutes ces caractéristiques, 
vous pouvez définir vos préférences 
(comme sur ST): les couleurs de 
fond, d'écran, les numéros des lec- 
teurs de disquettes. 


Un très bon logiciel, à voir et à avoir. 
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(parmi 512) et 320*200 en 16 cou- 
leurs (toujours parmi 512). Sur le ST, 
les couleurs se « construisent » de 
façon beaucoup plus imagée que sur 
les 8 Bits. En effet, on sélectionne 
une couleur par l'instruction SETCO- 
LOR registre, R, V, Boù R, Vet B 
sont respectivement les proportions 
‘ (de O à 7) de rouge, vert et bleu. Ainsi 
3, 3, 3 donne du gris, O, O, O du noir 
et 4, 7, 4 du vert clair. Avec un peu 
d'entraînement on obtient facilement 
par « mélange » des trois couleurs 
primaires la couleur désirée. 
Ilexiste une foule d'instructions gra- 
phiques, nous allons passer briève- 
ment en revue les plus simples et 
nous attarder plus longuement sur les 
autres. 

BOX dessine un rectangle, CIRCLE 
un cercle, FILL colore une zone fer- 
mée, LINE trace une ligne, RBOX 
trace un rectangle avec des coins 
arrondis, tandis qu’ELLIPSE dessine, 
bien sûr, une ellipse (cercle déformé). 


NB : Avec CIRCLE et ELLIPSE il est 
possible de ne dessiner qu'une por- 
tion de figure exprimée en dixièmes 
de degrés. PLOT trace un point, 
POINT retourne la valeur d'un pixel. 
L'ajout d'un P devant les instructions 
de tracé vues précédemment provo- 
que l'affichage d'un dessin plein. 
Ainsi PBOX trace un rectangle rem- 
pli. 


Pour toutes les fonctions qui remplis- 
sent une zone, la trame de remplis- 
sage doit préalablement etre définie 
par DEFFILL. Il existe 36 trames et 
vous pouvez créer les votres. L'ins- 
truction DEFLINE définit le type de 
ligne utilisée pour les contours et les 
lignes. Il existe 6 types de lignes, 
l'épaisseur est modifiable à votre gré. 


L'instruction GET permet de stocker 
un « morceau » d'écran dans une 
variable. Vous pouvez restituer cette 
partie d'écran où vous voulez avec 
l'instruction PUT. Ceci se fait très 
rapidement et peut être utilisé pour 
des animations. De plus, vous pou- 
vez spécifier un format de copie : 
votre bloc peut être transparent, 
semi-transparent, semi-opaque, opa- 
que, etc. Il y a en tout 16 modes 
(avec AND, OR, EQV, IMP, 
AND(NOT(1))... ). 


Dans le même ordre d'idées, SGET et 
SPUT permettent de stocker et de 
restituer la totalité de l'écran plus 
rapidement qu'avec GET et PUT. 

BMOVE n'est pas à proprement par- 
ler une instruction graphique mais 
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permet de déplacer une partie de la 
mémoire ce qui permet de réaliser 
très facilement des « scrollings ». 


L'EDITEUR 


L'éditeur bien que très sobre est 
extrêmement bien pensé et très pra- 
tique. En haut de l'écran, un rappel 
des principales fonctions que l'on 
peut obtenir soit par les touches de 
fontion, soit par la souris. Tout le 
reste de l'écran est consacré à votre 
listing. 

Comme sur le Basic XL, il existe un 
tas d'abréviations qui vous éviteront 
de taper l'instruction en entier et bien 
souvent les dièses et autres guille- 
mets sont optionnels et rajoutés par 
l'interpréteur. 

Tant que la syntaxe d’une ligne n'est 
pas correcte, vous ne pouvez pas en 
sortir : il ne peut plus y avoir d'erreurs 
de frappe dans votre programme. 
De plus les boucles, conditions et 
sous-programmes sont décalés vers 
la droite, ce qui rend le programme 
très lisible. Exemple : 


For A=1 Io 10 
For B=1 To 10 
For C=1 Io 10 
Print À,B,C 
Next C 
Next B 
Next À 


Quant aux messages d'erreur, ils 
sont non seulement en toutes lettres 
mais aussi très précis. Vous n'aurez 
pas un message « Erreur de calcul » 
mais par exemple « Racine carrée 
négative impossible ». On est bien 
loin du ERROR-2 AT LINE 30 du Basic 
XL ! 

L'éditeur comporte aussi de mini- 
fonctions de traitement de textes 
bien pratiques, avec la possibilité de 
copier, effacer, déplacer un bloc 
d'instruction ou de rechercher et 
remplacer une chaîne de caractères. 
Vous pouvez par exemple en quel- 
ques secondes remplacer vos varia- 
bles A$ par B$ (par exemple ! ). 
En Basic XL, on distingue le mode 
« direct » du mode « programma- 
tion » par l'absence de numéros de 
ligne. Mais en GfA il n'y a jamais de 
numéros de ligne, d'où la nécéssité 
d'utiliser une autre distinc 

tion. Le passage du mode « pro- 
gramme » au mode « direct » se fait 
par la touche Escape. 

On pourra ici éprouver un peu de nos- 
talgie pour l'éditeur d'écran des 8 Bits 


si souple et aux possibilités presque 
illimitées (Cf. article sur l'éditeur 
d'écran, Pokey n°2). 


_Eneffet, en GfA il n’est pas possible, 


par exemple, de « remonter » avec le 
curseur sur une instruction pour évi- 
ter de la retaper entièrement. On ne 
peut que récupérer la dernière ins- 
truction tapée. 


LES PERFORMANCES 


Le Basic GfA est très rapide, voici un 
petit exemple pour vous en convain- 
cre. 


FOR 1=1 TO 10000 
NEXT | 


GfA : 1, 14 secondes 
XL : 21, 46 secondes 


En plus de cela, il existe un certain 
nombre d'instructions qui font dou- 
ble emploi avec d’autres mais qui ont 
l'avantage d'être plus rapides. 


Inc A (Incrementer A) est par exem- 
ple beaucoup plus rapide que 
A=A+1 (cela représente un gain de 
vitesse d'environ 30%, ce qui n'est 
pas négligeable dans une boucle). 


Idem pour A =A-1, optimisé en DEC 
A. Il existe aussi des instructions 
pour les quatre opérations de base. 
Add A, B est strictement équivalent 
à A =A+B mais plus rapide. Il existe 
de nombreux autres exemples (Cf 
optimisation en GfA Basic, ST Maga- 
zine n°8). 


Ilest encore possible d'accélérer vos 
programmes avec le compila 

teur qui est l’objet du prochain cha- 
pitre. 


LE COMPILATEUR GFA 


La société qui a créé le GfA Basic, 
soucieuse de proposer un kit complet 
de développement capable de conve- 
nir à toutes les applications, a paral- 
lèlement au Basic développé un com- 
pilateur. 


Rappelons qu'un compilateur est un 
programme qui est capable de trans- 
former du langage évolué en langage 
machine. En l'occurrence, il permet 
de transformer vos programmes 
Basic en langage machine directe- 
ment exécutable. Ainsi il est très con- 


cevable de développer en Basic des 
programmes dans le but de les com- 
mercialiser puisqu'avec le compila- 
teur on obtient quelque chose à peu 
près équivalent à du langage C [le lan- 
gage qui, pour certains, est roi sur 
ST). ll existe plusieurs compilateurs 
pour Basic XL mais tous assez mau- 
vais ; ainsi, si vous gardez un mau- 
vais souvenir de ce genre de pro- 
grammes, sachez qu'il est temps de 
tourner la page ! En effet, le Compi- 
lateur GfA est très rapide, il compile 
en une seule passe et n'a aucun pro- 
blème à compiler tous les cas de 
figure possibles en Basic (il est vrai 
que le Basic GfA, très structuré, s'y 
prête mieux que le Basic XL). 


REMARQUES : 


ll ne nous reste plus, pour vous con- 
vaincre totalement, qu'à vous com- 
muniquer quelques détails non 
dénués d'intérêt. 

La notice du GfA Basic est très com- 
plète et très claire (300 pages en 
Français ! )}, mais attention, elle ne 
constitue néanmoins pas un ouvrage 
d'initiation au Basic. 

Sur la disquette du Basic il y a, en 
plus du Basic lui-même, quelques 
programmes d'exemples simples et 
en particulier un éditeur de « sprites » 
très utile. En plus de cela le GfA-Basic 
Run-Only (un programme qui permet 
uniquement d'exécuter vos program 


mes Basic, sans pouvoir les lister ni 
les modifier) est fourni et il est en 
freeware, ce qui permet de le donner 
à vos amis qui peuvent ainsi utiliser 
vos programmes sans avoir le GfA 
Basic. 


Dernier point : le Basic coûte environ 
500 francs et il faut en rajouter 
autant pour avoir le compilateur. Ca 
paraît cher, mais rappelez-vous que 
c'est un langage pratiquement aussi 
rapide que le C... et que, cette fois, 
vous pouvez calculer l'amortisse- 
ment sur plusieurs années. Alors. ? 


Franck JEANNIN 





L'ALGEBRE DE BOOLE 


Un peu d'histoire : 


L'algèbre de Boole est due à George Boole 
(1815-1864), mathématicien anglais qui 
publia en 1847, alors qu'il était profes- 
seur au Queen's College de Cork 
(Irlande), le premier d'une série d'articles 
intitulés « The Mathematical Analysis of 
logic » donnant ainsi naissance à l'algè- 
bre de la logique. 

Cette méthode de calcul, effectuée en 
système binaire, est bien adaptée aux dis- 
positifs logiques travaillant dans ce 
système, c'est-à-dire utilisant deux états 
correspondant à deux informations 1 et 
0 (à savoir tout ou rien, ce qui se traduit 
en informatique par du 5 volts ou du O 
volts). 

A l'époque de leur publication, les travaux 
de G. Boole n’eurent pas un grand reten- 
tissement et il faudra attendre ceux de 
l'Américain Claude Elwood Shannon (né 
en 1916) en 1938 sur la théorie de l'in- 
formation pour en trouver les premières 
applications. 

Enfin, l'Américain G. Stibitz utilisa l'algè- 
bre de Boole dans le premier calculateur 
binaire qu'il réalisa aux laboratoires amé- 
ricains Bell (extrait du livre Guinness des 
inventions). 


Un peu de pratique 


L'algèbre de Boole est une façon de for- 
muler des conditions rapide et compacte 
puisque proche de la machine. 

En effet le résultat est égal à 1 (vrai) ou 
O (faux). 


Mais comment cela se formule-t-il ? 
C'est très simple, voici un exemple : 


10 PRINT (A= 10) 


Le contenu de la parenthèse sera égal à 
1 si À est égal à 10 et à O si A est diffé- 
rent de 10. 

Ceci ne fonctionne pas seulement avec 
le signe =, tous les symboles de compa- 
raison mathématiques sont utilisables (=, 
£<>,>,<,>=,< =). Ainsi, on pourra 
obtenir le même résultat avec PRINT 
(5> 10), qui affichera bien évidemment 
O, puisque la comparaison se révèle 
fausse. 


Voici un petit programme et son equiva- 
lent en programmation « classique ». 


Programme utilisant les fonctions boo- 
léennes : 


10 INPUT A, B, C 

20 GOTO 
((A>B)*10+(B>C)*20+(C>A)*50) 
+ 20 
3OREMA>BB<CA>C.=>B<C<A 
40REMB>CA<BA>C => C<A<B 
50OREMA>BB>CC<A => C<B<A 
7OREMC>AA<BB<C => A<B<C 
80REM A>BB<CC>A => B<A<C 
9JOREMA<BB>CC>A => A<C<B 


Programme n'utilisant pas ces fonctions : 


10 INPUT A, B, C 

111IFA>B AND B<C AND A>C THEN 
GOTO 30 

121FB>C AND A<B AND A>C THEN 
GOTO 40 

131F A>B AND B>C AND C<A THEN 
GOTO 50 


141FC>A AND A<B AND B<C THEN 
GOTO 70 

151F A>B AND B<C AND C>A THEN 
GOTO 80 

16 IF A<B AND B>C AND C>A THEN 
GOTO 90 

30REMA>BB<CA>C =>B<C<A 
AOREMB>CA<BA>C => C<A<B 
HOREMA>BB>CC<A => C<B<A 
J0OREMC>AA<BB<C => A<B<C 
BOREMA>BB<CC>A => B<A<C 
90REMA<BB>CC>A => A<C<B 


Vous constatez que le premier pro- 
gramme est nettement plus performant 
que celui réalisé sans recourir à l'algèbre . 
de Boole |! ! 


Les utilisations de l'algèbre de Boole sont 
multiples. Pour vous en convaincre 
reportez-vous au cahier des listings. Vous 
y verrez un programme qui utilise un joys- 
tick avec et sans l'algèbre de Boole. Dans 
ce cas de figure la série de IF est légère- 
ment plus rapide que l'algèbre de Boole 
mais vous avouerez que ce dernier est 
beaucoup plus économe en mémoire. 


Je vous conseille d'utiliser autant que 
possible l'algèbre de Boole dans vos pro- 
grammes Basic, vous y gagnerez en rapi- 
dité et en place. 


L'algèbre de Boole se retrouve sous une 
forme quasiment identique en langage C. 
Ainsi, si vous décidez un jour de délais- 
ser le Basic pour le C, votre investisse- 
ment de temps n'aura pas été vain... 


Franck JEANNIN 
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